emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master 2bacd9115f: Make dired-do-rename refuse to rename . and ..


From: Lars Ingebrigtsen
Subject: master 2bacd9115f: Make dired-do-rename refuse to rename . and ..
Date: Sat, 24 Sep 2022 09:28:54 -0400 (EDT)

branch: master
commit 2bacd9115f15111a2b229ea21776bab2fd5839b1
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Make dired-do-rename refuse to rename . and ..
    
    * lisp/dired-aux.el (dired-do-rename): Refuse to rename . and ..
    (bug#52004).  This used to error out after renaming.
---
 lisp/dired-aux.el | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el
index f870494e93..9add96c260 100644
--- a/lisp/dired-aux.el
+++ b/lisp/dired-aux.el
@@ -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"))
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]