Mercurial > hg > xemacs-beta

diff lisp/prim/help.el @ 80:1ce6082ce73f r20-0b90

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-0b90
author cvs
date Mon, 13 Aug 2007 09:06:37 +0200
parents c0c698873ce1
children 0d2f883870bc
line wrap: on
line diff
--- a/lisp/prim/help.el	Mon Aug 13 09:05:44 2007 +0200
+++ b/lisp/prim/help.el	Mon Aug 13 09:06:37 2007 +0200
@@ -181,11 +181,12 @@
 (define-key help-mode-map "q" 'help-mode-quit)
 
 (defun help-mode-quit ()
-  "Exits from help mode, possiblely restoring the previous window configuration."
+  "Exits from help mode, possibly restoring the previous window configuration."
   (interactive)
   (cond ((local-variable-p 'help-window-config (current-buffer))
          (let ((config help-window-config))
 	   (kill-local-variable 'help-window-config)
+	   (bury-buffer)
 	   (set-window-configuration config)))
         ((one-window-p)
 	 (bury-buffer))