diff options
| author | Chong Yidong | 2008-04-06 21:05:17 +0000 |
|---|---|---|
| committer | Chong Yidong | 2008-04-06 21:05:17 +0000 |
| commit | 9a628d95f32093923f8a21da03d4e04b0aec8380 (patch) | |
| tree | 1ce361a752ae4114d87ec9cd718476ff4d38020e | |
| parent | 3b1b11e968c38c794e550a7689b3ca917b542d25 (diff) | |
| download | emacs-9a628d95f32093923f8a21da03d4e04b0aec8380.tar.gz emacs-9a628d95f32093923f8a21da03d4e04b0aec8380.zip | |
(dired-overwrite-confirmed): Undo last change.
| -rw-r--r-- | lisp/dired-aux.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el index d7d1d607999..407e7296adc 100644 --- a/lisp/dired-aux.el +++ b/lisp/dired-aux.el | |||
| @@ -1129,7 +1129,10 @@ Special value `always' suppresses confirmation." | |||
| 1129 | (other :tag "ask" t)) | 1129 | (other :tag "ask" t)) |
| 1130 | :group 'dired) | 1130 | :group 'dired) |
| 1131 | 1131 | ||
| 1132 | (defvar dired-overwrite-confirmed nil) | 1132 | ;; This is a fluid var used in dired-handle-overwrite. It should be |
| 1133 | ;; let-bound whenever dired-copy-file etc are called. See | ||
| 1134 | ;; dired-create-files for an example. | ||
| 1135 | (defvar dired-overwrite-confirmed) | ||
| 1133 | 1136 | ||
| 1134 | (defun dired-handle-overwrite (to) | 1137 | (defun dired-handle-overwrite (to) |
| 1135 | ;; Save old version of file TO that is to be overwritten. | 1138 | ;; Save old version of file TO that is to be overwritten. |