diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/files.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/files.el b/lisp/files.el index f8ebaa6c605..1f1640e24ba 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -5992,7 +5992,8 @@ Returns nil on success." (and (file-exists-p new-fn) ;; make new-fn unique. ;; example: "~/.Trash/abc.txt" -> "~/.Trash/abc.txt.~1~" - (let ((version-control t)) + (let ((version-control t) + (backup-directory-alist nil)) (setq new-fn (car (find-backup-file-name new-fn))))) ;; stop processing if fn is same or parent directory of trash-dir. (and (string-match fn trash-dir) |