procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Make dired-do-rename refuse to rename . and ..

Browse source 
* lisp/dired-aux.el (dired-do-rename): Refuse to rename . and ..
(bug#52004).  This used to error out after renaming.
This commit is contained in:
Lars Ingebrigtsen 2022-09-24 15:27:50 +02:00
parent 8dacd8cd91
commit 2bacd9115f
1 changed files with 4 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/dired-aux.el
View file

@ -2880,6 +2880,10 @@ of `dired-dwim-target', which see.
Also see `dired-do-revert-buffer'."
(interactive "P")
(when (seq-find (lambda (file)
(member (file-name-nondirectory file) '("." "..")))
(dired-get-marked-files nil arg))
(user-error "Can't rename \".\" or \"..\" files"))
(dired-do-create-files 'move #'dired-rename-file
"Move" arg dired-keep-marker-rename "Rename"))