emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/helm 5c9d28da67: Revert info buffer when already exists


From: ELPA Syncer
Subject: [nongnu] elpa/helm 5c9d28da67: Revert info buffer when already exists
Date: Thu, 6 Apr 2023 05:01:44 -0400 (EDT)

branch: elpa/helm
commit 5c9d28da67d3f42fd27c7f7fcf0701b899fbaa8a
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>

    Revert info buffer when already exists
---
 helm-info.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/helm-info.el b/helm-info.el
index 5842fb8e8c..54023bfb34 100644
--- a/helm-info.el
+++ b/helm-info.el
@@ -101,8 +101,10 @@ Argument TOBUF is the `helm-candidate-buffer'."
 
 (defun helm-info-goto (node-line)
   "The helm-info action to jump to NODE-LINE."
-  (Info-goto-node (car node-line))
-  (helm-goto-line (cdr node-line)))
+  (let ((alive (buffer-live-p (get-buffer "*info*"))))
+    (Info-goto-node (car node-line))
+    (when alive (revert-buffer nil t))
+    (helm-goto-line (cdr node-line))))
 
 (defvar helm-info--node-regexp
   "^\\* +\\(.+\\):[[:space:]]+\\(.*\\)\\(?:[[:space:]]*\\)(line +\\([0-9]+\\))"



reply via email to

[Prev in Thread] Current Thread [Next in Thread]