summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSimon Marshall <simon@gnu.org>1997-03-20 12:39:57 +0000
committerSimon Marshall <simon@gnu.org>1997-03-20 12:39:57 +0000
commitde8badabd96316a871995a595aa2c497a1f79901 (patch)
tree515bea82a4c8af91732fb7d8ff8eae90cf014837
parente312c46347c8fed39e666c8db04f0aa10465fe0a (diff)
downloademacs-de8badabd96316a871995a595aa2c497a1f79901.tar.gz
Allow a dired-no-confirm of t
-rw-r--r--lisp/dired-aux.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el
index 6c07d430df4..5d382ed8272 100644
--- a/lisp/dired-aux.el
+++ b/lisp/dired-aux.el
@@ -592,7 +592,8 @@ Otherwise, the rule is a compression rule, and compression is done with gzip.")
;; Confirmation consists in a y-or-n question with a file list
;; pop-up unless OP-SYMBOL is a member of `dired-no-confirm'.
;; The files used are determined by ARG (as in dired-get-marked-files).
- (or (memq op-symbol dired-no-confirm)
+ (or (eq dired-no-confirm t)
+ (memq op-symbol dired-no-confirm)
(let ((files (dired-get-marked-files t arg))
(string (if (eq op-symbol 'compress) "Compress or uncompress"
(capitalize (symbol-name op-symbol)))))