diff options
| author | Richard M. Stallman <rms@gnu.org> | 1996-11-02 07:56:50 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1996-11-02 07:56:50 +0000 |
| commit | a287f5370cb95d89f4a52dbe3508b115fd5f302e (patch) | |
| tree | bc1479f383e50b8ada46856d7f4767c8342482f7 /lisp/dired.el | |
| parent | d0c53974142adb697455df1e2a0165417101636c (diff) | |
| download | emacs-a287f5370cb95d89f4a52dbe3508b115fd5f302e.tar.gz | |
(dired-mode-map): Make * a prefix for mark commands.
Delete the old *, / and @ keybindings.
Diffstat (limited to 'lisp/dired.el')
| -rw-r--r-- | lisp/dired.el | 18 |
1 files changed, 14 insertions, 4 deletions
diff --git a/lisp/dired.el b/lisp/dired.el index 679d82936e7..88fdead3a1c 100644 --- a/lisp/dired.el +++ b/lisp/dired.el @@ -775,10 +775,7 @@ If DIRNAME is already in a dired buffer, that buffer is used without refresh." (define-key map [mouse-2] 'dired-mouse-find-file-other-window) ;; Commands to mark or flag certain categories of files (define-key map "#" 'dired-flag-auto-save-files) - (define-key map "*" 'dired-mark-executables) (define-key map "." 'dired-clean-directory) - (define-key map "/" 'dired-mark-directories) - (define-key map "@" 'dired-mark-symlinks) (define-key map "~" 'dired-flag-backup-files) ;; Upper case keys (except !) for operating on the marked files (define-key map "A" 'dired-do-search) @@ -823,8 +820,21 @@ If DIRNAME is already in a dired buffer, that buffer is used without refresh." (define-key map "%H" 'dired-do-hardlink-regexp) (define-key map "%R" 'dired-do-rename-regexp) (define-key map "%S" 'dired-do-symlink-regexp) + ;; Commands for marking and unmarking. + (define-key map "*" nil) + (define-key map "**" 'dired-mark-executables) + (define-key map "*/" 'dired-mark-directories) + (define-key map "*@" 'dired-mark-symlinks) + (define-key map "*%" 'dired-mark-files-regexp) + (define-key map "*c" 'dired-change-marks) + (define-key map "*m" 'dired-mark) + (define-key map "*u" 'dired-unmark) + (define-key map "*?" 'dired-unmark-all-files) + (define-key map "*!" 'dired-unmark-all-files-noquery) + (define-key map "*\177" 'dired-unmark-backward) + (define-key map "*\C-n" 'dired-next-marked-file) + (define-key map "*\C-p" 'dired-prev-marked-file) ;; Lower keys for commands not operating on all the marked files - (define-key map "c" 'dired-change-marks) (define-key map "d" 'dired-flag-file-deletion) (define-key map "e" 'dired-find-file) (define-key map "f" 'dired-find-file) |