# HG changeset patch # User Chong Yidong # Date 1207512697 0 # Node ID 2172dd8304aef0982a987deca59afc207314e553 # Parent 2604709dd36f2b1f0205ce4c18bddb0ccb3090c7 (dired-overwrite-confirmed): Revert last change. diff -r 2604709dd36f -r 2172dd8304ae lisp/dired-aux.el --- a/lisp/dired-aux.el Sun Apr 06 20:11:21 2008 +0000 +++ b/lisp/dired-aux.el Sun Apr 06 20:11:37 2008 +0000 @@ -1179,7 +1179,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.