summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1996-11-02 07:56:50 +0000
committerRichard M. Stallman <rms@gnu.org>1996-11-02 07:56:50 +0000
commita287f5370cb95d89f4a52dbe3508b115fd5f302e (patch)
treebc1479f383e50b8ada46856d7f4767c8342482f7 /lisp
parentd0c53974142adb697455df1e2a0165417101636c (diff)
downloademacs-a287f5370cb95d89f4a52dbe3508b115fd5f302e.tar.gz
(dired-mode-map): Make * a prefix for mark commands.
Delete the old *, / and @ keybindings.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/dired.el18
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)