procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* info.el (info-display-manual): Don't clobber an existing Info buffer.

Browse source 
Fixes: debbugs:10770
This commit is contained in:
Juri Linkov 2012-12-02 14:22:32 +08:00 • committed by Chong Yidong
parent 89eb3b0ae7
commit 3faf494431
2 changed files with 10 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2012-12-02 Juri Linkov <juri@jurta.org>
* info.el (info-display-manual): Don't clobber an existing Info
buffer (Bug#10770).
2012-12-01 Yuya Nishihara <yuya@tcha.org> (tiny change)
* vc/vc-hooks.el (vc-find-file-hook): Expand buffer-file-truename

7
lisp/info.el
View file

@ -5097,7 +5097,9 @@ type returned by `Info-bookmark-make-record', which see."
;;;###autoload
(defun info-display-manual (manual)
"Go to Info buffer that displays MANUAL, creating it if none already exists."
"Display an Info buffer displaying MANUAL.
If there is an existing Info buffer for MANUAL, display it.
Otherwise, visit the manual in a new Info buffer."
(interactive "sManual name: ")
(let ((blist (buffer-list))
(manual-re (concat "\\(/\\|\\`\\)" manual "\\(\\.\\|\\'\\)"))
@ -5113,7 +5115,8 @@ type returned by `Info-bookmark-make-record', which see."
(if found
(switch-to-buffer found)
(info-initialize)
(info (Info-find-file manual)))))
(info (Info-find-file manual)
(generate-new-buffer-name "*info*")))))
(provide 'info)