[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]+\\))"
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [nongnu] elpa/helm 5c9d28da67: Revert info buffer when already exists,
ELPA Syncer <=