# HG changeset patch # User Richard M. Stallman # Date 1017340379 0 # Node ID e87d819f2887f84f8415f8d3e6c28b8777fcf05a # Parent c73b0428e06d32c70158935e9b342c645c9961b4 (dired-toggle-marks): Renamed from dired-do-toggle. Bindings changed. diff -r c73b0428e06d -r e87d819f2887 lisp/dired.el --- a/lisp/dired.el Thu Mar 28 18:29:02 2002 +0000 +++ b/lisp/dired.el Thu Mar 28 18:32:59 2002 +0000 @@ -907,7 +907,7 @@ (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) - (define-key map "*t" 'dired-do-toggle) + (define-key map "*t" 'dired-toggle-marks) ;; Lower keys for commands not operating on all the marked files (define-key map "a" 'dired-find-alternate-file) (define-key map "d" 'dired-flag-file-deletion) @@ -926,7 +926,7 @@ (define-key map "p" 'dired-previous-line) (define-key map "q" 'quit-window) (define-key map "s" 'dired-sort-toggle-or-edit) - (define-key map "t" 'dired-do-toggle) + (define-key map "t" 'dired-toggle-marks) (define-key map "u" 'dired-unmark) (define-key map "v" 'dired-view-file) (define-key map "w" 'dired-copy-filename-as-kill) @@ -1107,7 +1107,7 @@ '(menu-item "Mark" dired-mark :help "Mark current line's file for future operations")) (define-key map [menu-bar mark toggle-marks] - '(menu-item "Toggle Marks" dired-do-toggle + '(menu-item "Toggle Marks" dired-toggle-marks :help "Mark unmarked files, unmark marked ones")) (define-key map [menu-bar operate] @@ -2359,9 +2359,8 @@ (interactive "p") (dired-unmark (- arg))) -(defun dired-do-toggle () - "Toggle marks. -That is, currently marked files become unmarked and vice versa. +(defun dired-toggle-marks () + "Toggle marks: marked files become unmarked, and vice versa. Files marked with other flags (such as `D') are not affected. `.' and `..' are never toggled. As always, hidden subdirs are not affected."