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

diff --git a/lisp/arc-mode.el b/lisp/arc-mode.el
index 05878ea52d5b705c6add441936d17c1662ff7ae0..f309473b75ba0965dfbd63e21f703741093b6766 100644 (file)
--- a/lisp/arc-mode.el
+++ b/lisp/arc-mode.el
@@ -587,6 +587,7 @@ archive.
   (define-key archive-mode-map [down] 'archive-next-line)
   (define-key archive-mode-map "o" 'archive-extract-other-window)
   (define-key archive-mode-map "p" 'archive-previous-line)
+  (define-key archive-mode-map "q" 'quit-window)
   (define-key archive-mode-map "\C-p" 'archive-previous-line)
   (define-key archive-mode-map [up] 'archive-previous-line)
   (define-key archive-mode-map "r" 'archive-rename-entry)