# HG changeset patch # User Richard M. Stallman # Date 865711884 0 # Node ID c64b7a17eea986edfa440b56408bd5dc70eabb8a # Parent 21e4deb76701a9daf59fa616eb24e7c18f64a08c (dired-unmark-all-marks): Renamed from dired-unmark-all-files-no-query. diff -r 21e4deb76701 -r c64b7a17eea9 lisp/dired.el --- a/lisp/dired.el Sat Jun 07 07:02:02 1997 +0000 +++ b/lisp/dired.el Sat Jun 07 19:31:24 1997 +0000 @@ -868,7 +868,7 @@ (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-no-query) + (define-key map "*!" 'dired-unmark-all-marks) (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) @@ -994,7 +994,7 @@ (define-key map [menu-bar mark marks] '("Change Marks..." . dired-change-marks)) (define-key map [menu-bar mark unmark-all] - '("Unmark All" . dired-unmark-all-files-no-query)) + '("Unmark All" . dired-unmark-all-marks)) (define-key map [menu-bar mark symlinks] '("Mark Symlinks" . dired-mark-symlinks)) (define-key map [menu-bar mark directories] @@ -2211,7 +2211,7 @@ (subst-char-in-region (match-beginning 0) (match-end 0) old new))))))) -(defun dired-unmark-all-files-no-query () +(defun dired-unmark-all-marks () "Remove all marks from all files in the Dired buffer." (interactive) (dired-unmark-all-files ?\r))