aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorSimon Marshall1997-03-20 12:39:57 +0000
committerSimon Marshall1997-03-20 12:39:57 +0000
commit7baff557b6794774fe094e17fe83e18c8642038e (patch)
tree003e1d706d0a419f51a5059b925126784e52039d
parent0347d0695461697204623dfb0e43d6f24a05fdee (diff)
downloademacs-7baff557b6794774fe094e17fe83e18c8642038e.tar.gz
emacs-7baff557b6794774fe094e17fe83e18c8642038e.zip
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.")
592 ;; Confirmation consists in a y-or-n question with a file list 592 ;; Confirmation consists in a y-or-n question with a file list
593 ;; pop-up unless OP-SYMBOL is a member of `dired-no-confirm'. 593 ;; pop-up unless OP-SYMBOL is a member of `dired-no-confirm'.
594 ;; The files used are determined by ARG (as in dired-get-marked-files). 594 ;; The files used are determined by ARG (as in dired-get-marked-files).
595 (or (memq op-symbol dired-no-confirm) 595 (or (eq dired-no-confirm t)
596 (memq op-symbol dired-no-confirm)
596 (let ((files (dired-get-marked-files t arg)) 597 (let ((files (dired-get-marked-files t arg))
597 (string (if (eq op-symbol 'compress) "Compress or uncompress" 598 (string (if (eq op-symbol 'compress) "Compress or uncompress"
598 (capitalize (symbol-name op-symbol))))) 599 (capitalize (symbol-name op-symbol)))))