mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-16 17:24:23 +00:00
Move point in dired buffers when handling a list of files
* lisp/dired-aux.el (dired-create-files): Advance point to the current file (bug#8015).
This commit is contained in:
parent
16793dc35a
commit
7ea7e26ab1
1 changed files with 3 additions and 0 deletions
|
|
@ -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
|
||||
|
|
|
|||
Loading…
Reference in a new issue