Mercurial > emacs
comparison lisp/dired.el @ 18160:c64b7a17eea9
(dired-unmark-all-marks):
Renamed from dired-unmark-all-files-no-query.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 07 Jun 1997 19:31:24 +0000 |
| parents | 2e732d9d5b79 |
| children | 41c3ad77f90a |
comparison
equal
deleted
inserted
replaced
| 18159:21e4deb76701 | 18160:c64b7a17eea9 |
|---|---|
| 866 (define-key map "*c" 'dired-change-marks) | 866 (define-key map "*c" 'dired-change-marks) |
| 867 (define-key map "*s" 'dired-mark-subdir-files) | 867 (define-key map "*s" 'dired-mark-subdir-files) |
| 868 (define-key map "*m" 'dired-mark) | 868 (define-key map "*m" 'dired-mark) |
| 869 (define-key map "*u" 'dired-unmark) | 869 (define-key map "*u" 'dired-unmark) |
| 870 (define-key map "*?" 'dired-unmark-all-files) | 870 (define-key map "*?" 'dired-unmark-all-files) |
| 871 (define-key map "*!" 'dired-unmark-all-files-no-query) | 871 (define-key map "*!" 'dired-unmark-all-marks) |
| 872 (define-key map "*\177" 'dired-unmark-backward) | 872 (define-key map "*\177" 'dired-unmark-backward) |
| 873 (define-key map "*\C-n" 'dired-next-marked-file) | 873 (define-key map "*\C-n" 'dired-next-marked-file) |
| 874 (define-key map "*\C-p" 'dired-prev-marked-file) | 874 (define-key map "*\C-p" 'dired-prev-marked-file) |
| 875 ;; Lower keys for commands not operating on all the marked files | 875 ;; Lower keys for commands not operating on all the marked files |
| 876 (define-key map "d" 'dired-flag-file-deletion) | 876 (define-key map "d" 'dired-flag-file-deletion) |
| 992 (define-key map [menu-bar mark next] | 992 (define-key map [menu-bar mark next] |
| 993 '("Next Marked" . dired-next-marked-file)) | 993 '("Next Marked" . dired-next-marked-file)) |
| 994 (define-key map [menu-bar mark marks] | 994 (define-key map [menu-bar mark marks] |
| 995 '("Change Marks..." . dired-change-marks)) | 995 '("Change Marks..." . dired-change-marks)) |
| 996 (define-key map [menu-bar mark unmark-all] | 996 (define-key map [menu-bar mark unmark-all] |
| 997 '("Unmark All" . dired-unmark-all-files-no-query)) | 997 '("Unmark All" . dired-unmark-all-marks)) |
| 998 (define-key map [menu-bar mark symlinks] | 998 (define-key map [menu-bar mark symlinks] |
| 999 '("Mark Symlinks" . dired-mark-symlinks)) | 999 '("Mark Symlinks" . dired-mark-symlinks)) |
| 1000 (define-key map [menu-bar mark directories] | 1000 (define-key map [menu-bar mark directories] |
| 1001 '("Mark Directories" . dired-mark-directories)) | 1001 '("Mark Directories" . dired-mark-directories)) |
| 1002 (define-key map [menu-bar mark directory] | 1002 (define-key map [menu-bar mark directory] |
| 2209 (dired-get-filename 'no-dir t)) | 2209 (dired-get-filename 'no-dir t)) |
| 2210 t) | 2210 t) |
| 2211 (subst-char-in-region (match-beginning 0) | 2211 (subst-char-in-region (match-beginning 0) |
| 2212 (match-end 0) old new))))))) | 2212 (match-end 0) old new))))))) |
| 2213 | 2213 |
| 2214 (defun dired-unmark-all-files-no-query () | 2214 (defun dired-unmark-all-marks () |
| 2215 "Remove all marks from all files in the Dired buffer." | 2215 "Remove all marks from all files in the Dired buffer." |
| 2216 (interactive) | 2216 (interactive) |
| 2217 (dired-unmark-all-files ?\r)) | 2217 (dired-unmark-all-files ?\r)) |
| 2218 | 2218 |
| 2219 (defun dired-unmark-all-files (mark &optional arg) | 2219 (defun dired-unmark-all-files (mark &optional arg) |