# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 946674837 0
# Node ID 0a8d7e789bcaa0ff27764dd47a9ae429070cca7e
# Parent  414002a326d99905c4dbc12ce0f85ebf296dc55b
(archive-mode-map): Bind q to quit-window.

diff -r 414002a326d9 -r 0a8d7e789bca lisp/arc-mode.el
--- a/lisp/arc-mode.el	Fri Dec 31 16:47:13 1999 +0000
+++ b/lisp/arc-mode.el	Fri Dec 31 21:13:57 1999 +0000
@@ -587,6 +587,7 @@
   (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)