Variable: archive-mode-map
archive-mode-map is a variable defined in arc-mode.el.gz.
Value
Large value
- negative-argument
0 digit-argument
1 digit-argument
2 digit-argument
3 digit-argument
4 digit-argument
5 digit-argument
6 digit-argument
7 digit-argument
8 digit-argument
9 digit-argument
< beginning-of-buffer
<down> archive-next-line
<follow-link> mouse-face
<mouse-2> archive-extract
<up> archive-previous-line
> end-of-buffer
? describe-mode
C archive-copy-file
C-d archive-flag-deleted
C-n archive-next-line
C-p archive-previous-line
C-x u archive-undo
DEL archive-unflag-backwards
DEL scroll-down-command
E archive-extract-other-window
G archive-chgrp-entry
M archive-chmod-entry
M-DEL archive-unmark-all-files
O archive-chown-entry
RET archive-extract
S-SPC archive-previous-line
S-SPC scroll-down-command
SPC archive-next-line
SPC scroll-up-command
SPC..~ undefined
a archive-alternate-display(var)/archive-alternate-display(fun)
d archive-flag-deleted
g revert-buffer
h describe-mode
m archive-mark
n archive-next-line
o archive-extract-other-window
p archive-previous-line
q quit-window
r archive-rename-entry
u archive-unflag
v archive-view
x archive-expunge
..\x3FFFFF archive-extract
Documentation
Local keymap for archive mode listings.
Source Code
;; Defined in /usr/src/emacs/lisp/arc-mode.el.gz
(defvar archive-mode-map
(let ((map (make-keymap)))
(set-keymap-parent map special-mode-map)
(define-key map " " 'archive-next-line)
(define-key map "a" 'archive-alternate-display)
;;(define-key map "c" 'archive-copy)
(define-key map "d" 'archive-flag-deleted)
(define-key map "\C-d" 'archive-flag-deleted)
(define-key map "e" 'archive-extract)
(define-key map "f" 'archive-extract)
(define-key map "\C-m" 'archive-extract)
(define-key map "C" 'archive-copy-file)
(define-key map "m" 'archive-mark)
(define-key map "n" 'archive-next-line)
(define-key map "\C-n" 'archive-next-line)
(define-key map [down] 'archive-next-line)
(define-key map "o" 'archive-extract-other-window)
(define-key map "p" 'archive-previous-line)
(define-key map "\C-p" 'archive-previous-line)
(define-key map [?\S-\ ] 'archive-previous-line)
(define-key map [up] 'archive-previous-line)
(define-key map "r" 'archive-rename-entry)
(define-key map "u" 'archive-unflag)
(define-key map "\M-\C-?" 'archive-unmark-all-files)
(define-key map "v" 'archive-view)
(define-key map "x" 'archive-expunge)
(define-key map "\177" 'archive-unflag-backwards)
(define-key map "E" 'archive-extract-other-window)
(define-key map "M" 'archive-chmod-entry)
(define-key map "G" 'archive-chgrp-entry)
(define-key map "O" 'archive-chown-entry)
;; Let mouse-1 follow the link.
(define-key map [follow-link] 'mouse-face)
(define-key map [remap undo] #'archive-undo)
(define-key map [mouse-2] 'archive-extract)
(define-key map [menu-bar immediate]
(cons "Immediate" (make-sparse-keymap "Immediate")))
(define-key map [menu-bar immediate alternate]
'(menu-item "Alternate Display" archive-alternate-display
:help "Toggle alternate file info display"))
(define-key map [menu-bar immediate view]
'(menu-item "View This File" archive-view
:help "Display file at cursor in View Mode"))
(define-key map [menu-bar immediate view]
'(menu-item "Copy This File" archive-copy-file
:help "Copy file at cursor to another location"))
(define-key map [menu-bar immediate display]
'(menu-item "Display in Other Window" archive-display-other-window
:help "Display file at cursor in another window"))
(define-key map [menu-bar immediate find-file-other-window]
'(menu-item "Find in Other Window" archive-extract-other-window
:help "Edit file at cursor in another window"))
(define-key map [menu-bar immediate find-file]
'(menu-item "Find This File" archive-extract
:help "Extract file at cursor and edit it"))
(define-key map [menu-bar mark]
(cons "Mark" (make-sparse-keymap "Mark")))
(define-key map [menu-bar mark unmark-all]
'(menu-item "Unmark All" archive-unmark-all-files
:help "Unmark all marked files"))
(define-key map [menu-bar mark deletion]
'(menu-item "Flag" archive-flag-deleted
:help "Flag file at cursor for deletion"))
(define-key map [menu-bar mark unmark]
'(menu-item "Unflag" archive-unflag
:help "Unmark file at cursor"))
(define-key map [menu-bar mark mark]
'(menu-item "Mark" archive-mark
:help "Mark file at cursor"))
(define-key map [menu-bar operate]
(cons "Operate" (make-sparse-keymap "Operate")))
(define-key map [menu-bar operate chown]
'(menu-item "Change Owner..." archive-chown-entry
:enable (fboundp (archive-name "chown-entry"))
:help "Change owner of marked files"))
(define-key map [menu-bar operate chgrp]
'(menu-item "Change Group..." archive-chgrp-entry
:enable (fboundp (archive-name "chgrp-entry"))
:help "Change group ownership of marked files"))
(define-key map [menu-bar operate chmod]
'(menu-item "Change Mode..." archive-chmod-entry
:enable (fboundp (archive-name "chmod-entry"))
:help "Change mode (permissions) of marked files"))
(define-key map [menu-bar operate rename]
'(menu-item "Rename to..." archive-rename-entry
:enable (fboundp (archive-name "rename-entry"))
:help "Rename marked files"))
;;(define-key map [menu-bar operate copy]
;; '(menu-item "Copy to..." archive-copy))
(define-key map [menu-bar operate expunge]
'(menu-item "Expunge Marked Files" archive-expunge
:help "Delete all flagged files from archive"))
map)
"Local keymap for archive mode listings.")