emacs-elpa-diffs
[Top][All Lists]
Advanced

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

[nongnu] elpa/wfnames 750c1370c6 41/98: Merge branch 'devel' into main


From: ELPA Syncer
Subject: [nongnu] elpa/wfnames 750c1370c6 41/98: Merge branch 'devel' into main
Date: Tue, 8 Aug 2023 04:01:20 -0400 (EDT)

branch: elpa/wfnames
commit 750c1370c6b1d991e17f7fbc11e9946f254bfb96
Merge: 810aea61db ac577774ef
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>

    Merge branch 'devel' into main
---
 wfnames.el | 10 ----------
 1 file changed, 10 deletions(-)

diff --git a/wfnames.el b/wfnames.el
index 235635754e..94a01671ed 100644
--- a/wfnames.el
+++ b/wfnames.el
@@ -50,10 +50,6 @@
   "Ask confirmation when overwriting."
   :type 'boolean)
 
-(defcustom wfnames-backup-overwrite nil
-  "Make a backup when overwriting."
-  :type 'boolean)
-
 (defface wfnames-modified '((t :background "LightBlue"))
   "Face used when filename is modified.")
 
@@ -150,9 +146,6 @@ Special commands:
                                                   new)))
                                      (let ((tmpfile (make-temp-name old)))
                                        (push (cons new tmpfile) delayed)
-                                       (when wfnames-backup-overwrite
-                                         (rename-file
-                                          new (car (find-backup-file-name 
new))))
                                        (rename-file new tmpfile))
                                    ;; Answer is no, skip.
                                    (add-text-properties
@@ -171,9 +164,6 @@ Special commands:
                                                   new)))
                                      (let ((tmpfile (make-temp-name new)))
                                        (push (cons new tmpfile) delayed)
-                                       (when wfnames-backup-overwrite
-                                         (rename-file
-                                          new (car (find-backup-file-name 
new))))
                                        (rename-file new tmpfile))
                                    ;; Answer is no, skip.
                                    (add-text-properties



reply via email to

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