Mercurial > emacs
changeset 60462:df46d87c0c2f
(help-mode-finish): Don't alter the element
in view-return-to-alist if there already is one.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sun, 06 Mar 2005 18:32:32 +0000 |
parents | f31205c87d5e |
children | be3ac492036f |
files | lisp/help-mode.el |
diffstat | 1 files changed, 6 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/help-mode.el Sun Mar 06 18:31:36 2005 +0000 +++ b/lisp/help-mode.el Sun Mar 06 18:32:32 2005 +0000 @@ -194,8 +194,12 @@ ;;;###autoload (defun help-mode-finish () (let ((entry (assq (selected-window) view-return-to-alist))) - (if entry (setcdr entry (cons (selected-window) - help-return-method)) + (if entry + ;; When entering Help mode from the Help window, + ;; such as by following a link, preserve the same + ;; meaning for the q command. + ;; (setcdr entry (cons (selected-window) help-return-method)) + nil (setq view-return-to-alist (cons (cons (selected-window) help-return-method) view-return-to-alist))))