comparison lisp/arc-mode.el @ 27062:0a8d7e789bca

(archive-mode-map): Bind q to quit-window.
author Richard M. Stallman <rms@gnu.org>
date Fri, 31 Dec 1999 21:13:57 +0000
parents b3c0f3ad64d8
children c690edebf377
comparison
equal deleted inserted replaced
27061:414002a326d9 27062:0a8d7e789bca
585 (define-key archive-mode-map "n" 'archive-next-line) 585 (define-key archive-mode-map "n" 'archive-next-line)
586 (define-key archive-mode-map "\C-n" 'archive-next-line) 586 (define-key archive-mode-map "\C-n" 'archive-next-line)
587 (define-key archive-mode-map [down] 'archive-next-line) 587 (define-key archive-mode-map [down] 'archive-next-line)
588 (define-key archive-mode-map "o" 'archive-extract-other-window) 588 (define-key archive-mode-map "o" 'archive-extract-other-window)
589 (define-key archive-mode-map "p" 'archive-previous-line) 589 (define-key archive-mode-map "p" 'archive-previous-line)
590 (define-key archive-mode-map "q" 'quit-window)
590 (define-key archive-mode-map "\C-p" 'archive-previous-line) 591 (define-key archive-mode-map "\C-p" 'archive-previous-line)
591 (define-key archive-mode-map [up] 'archive-previous-line) 592 (define-key archive-mode-map [up] 'archive-previous-line)
592 (define-key archive-mode-map "r" 'archive-rename-entry) 593 (define-key archive-mode-map "r" 'archive-rename-entry)
593 (define-key archive-mode-map "u" 'archive-unflag) 594 (define-key archive-mode-map "u" 'archive-unflag)
594 (define-key archive-mode-map "\M-\C-?" 'archive-unmark-all-files) 595 (define-key archive-mode-map "\M-\C-?" 'archive-unmark-all-files)