summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lisp/files.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/files.el b/lisp/files.el
index 06a3e28768b..03a3a03cbb2 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -5828,7 +5828,8 @@ Returns nil on success."
(and (string-match fn trash-dir)
(error "Filename `%s' is same or parent directory of trash-directory"
filename))
- (rename-file fn new-fn)))))
+ (let ((delete-by-moving-to-trash nil))
+ (rename-file fn new-fn))))))
(define-key ctl-x-map "\C-f" 'find-file)