# HG changeset patch # User Chong Yidong # Date 1207514221 0 # Node ID e771e6c269d3e46f5ca3d32256f50331a733aaaf # Parent 0938815102548a7b20cfd712abd99399a47f2a18 Fix last fix. diff -r 093881510254 -r e771e6c269d3 lisp/dired.el --- a/lisp/dired.el Sun Apr 06 20:34:11 2008 +0000 +++ b/lisp/dired.el Sun Apr 06 20:37:01 2008 +0000 @@ -3311,7 +3311,9 @@ (rename-file to backup-file 0) (dired-relist-entry backup-file)) (dired-copy-file from to overwrite))) - (t (dired-copy-file from to nil))) + (t + (let (dired-overwrite-confirmed) + (dired-copy-file from to nil)))) (dired-relist-entry to) action) ((eq action 'move)