(apropos-mode-map): Bind q to quit-window.

diff --git a/lisp/apropos.el b/lisp/apropos.el
index 89ea5e4..90fa430 100644 (file)
--- a/lisp/apropos.el
+++ b/lisp/apropos.el
@@ -108,8 +108,9 @@ This looks good, but slows down the commands several times."
 (defvar apropos-mode-map
   (let ((map (make-sparse-keymap)))
     (define-key map "\C-m" 'apropos-follow)
-    (define-key map " "      'scroll-up)
-    (define-key map "\177"   'scroll-down)
+    (define-key map " "    'scroll-up)
+    (define-key map "\177" 'scroll-down)
+    (define-key map "q"    'quit-window)
     (define-key map [mouse-2] 'apropos-mouse-follow)
     (define-key map [down-mouse-2] nil)
     map)