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))))