diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/dired-aux.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el index a1dda3f5a20..3a721cd4d9d 100644 --- a/lisp/dired-aux.el +++ b/lisp/dired-aux.el @@ -1963,6 +1963,9 @@ or with the current marker character if MARKER-CHAR is t." (let (to overwrite-query overwrite-backup-query) ; for dired-handle-overwrite (dolist (from fn-list) + ;; Position point on the current file -- this is useful if + ;; handling a number of files to show where we're working at. + (dired-goto-file from) (setq to (funcall name-constructor from)) (if (equal to from) (progn |