summaryrefslogtreecommitdiff
path: root/lisp/help-mode.el
diff options
context:
space:
mode:
authorKelly Dean <kelly@prtime.org>2015-02-16 04:17:09 +0000
committerArtur Malabarba <bruce.connor.am@gmail.com>2015-02-17 22:08:51 -0200
commit77052f4baa974802021197536f7f5004f471fc48 (patch)
tree0eaa3eba4fce0f8f72dc3927e1dc56631c69da3e /lisp/help-mode.el
parentcec04fb220601bdc653a44b007316a7e53663921 (diff)
downloademacs-77052f4baa974802021197536f7f5004f471fc48.tar.gz
* help-mode.el: Prevent duplicated display of Info buffer. (Bug#13190)
Diffstat (limited to 'lisp/help-mode.el')
-rw-r--r--lisp/help-mode.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/help-mode.el b/lisp/help-mode.el
index 564362a0c43..b8b129dbc4a 100644
--- a/lisp/help-mode.el
+++ b/lisp/help-mode.el
@@ -739,7 +739,8 @@ Things are set up properly so that the resulting help-buffer has
a proper [back] button."
;; There is a reference at point. Follow it.
(let ((help-xref-following t))
- (apply function args)))
+ (apply function (if (eq function 'info)
+ (append args (list (generate-new-buffer-name "*info*"))) args))))
;; The doc string is meant to explain what buttons do.
(defun help-follow-mouse ()