(completion-list-mode-map): Bind "q" to quit-window,

just like in all other read-only buffers.

2 files changed, 6 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0c41d3f4268..4b6d1517d6f 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2009-04-06  Sam Steingold  <sds@gnu.org>
+
+        * simple.el (completion-list-mode-map): Bind "q" to quit-window,
+        just like in all other read-only buffers.
+
 2009-04-05  Chong Yidong  <cyd@stupidchicken.com>
 
         * simple.el (handle-shift-selection): Clarify docstring.
diff --git a/lisp/simple.el b/lisp/simple.el
index 0b7ed49a3a0..fd281429032 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -5614,6 +5614,7 @@ With a prefix argument, set VARIABLE to VALUE buffer-locally."
     (define-key map "\e\e\e" 'delete-completion-window)
     (define-key map [left] 'previous-completion)
     (define-key map [right] 'next-completion)
+    (define-key map "q" 'quit-window)
     map)
   "Local map for completion list buffers.")