# HG changeset patch # User Chong Yidong # Date 1207515917 0 # Node ID e882cf931fd4ff84d892c6df8017502cb5f6d8a0 # Parent 837d54fb9fc9d0deef55c60fd52b442d766fbfa9 (dired-overwrite-confirmed): Undo last change. diff -r 837d54fb9fc9 -r e882cf931fd4 lisp/dired-aux.el --- a/lisp/dired-aux.el Sun Apr 06 21:01:54 2008 +0000 +++ b/lisp/dired-aux.el Sun Apr 06 21:05:17 2008 +0000 @@ -1129,7 +1129,10 @@ (other :tag "ask" t)) :group 'dired) -(defvar dired-overwrite-confirmed nil) +;; This is a fluid var used in dired-handle-overwrite. It should be +;; let-bound whenever dired-copy-file etc are called. See +;; dired-create-files for an example. +(defvar dired-overwrite-confirmed) (defun dired-handle-overwrite (to) ;; Save old version of file TO that is to be overwritten.