[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/dired-aux.el,v
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/dired-aux.el,v |
Date: |
Wed, 26 Mar 2008 03:34:10 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Stefan Monnier <monnier> 08/03/26 03:34:09
Index: dired-aux.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/dired-aux.el,v
retrieving revision 1.163
retrieving revision 1.164
diff -u -b -r1.163 -r1.164
--- dired-aux.el 8 Jan 2008 20:44:44 -0000 1.163
+++ dired-aux.el 26 Mar 2008 03:34:06 -0000 1.164
@@ -1389,9 +1389,7 @@
skipped (success-count 0) (total (length fn-list)))
(let (to overwrite-query
overwrite-backup-query) ; for dired-handle-overwrite
- (mapc
- (function
- (lambda (from)
+ (dolist (from fn-list)
(setq to (funcall name-constructor from))
(if (equal to from)
(progn
@@ -1433,7 +1431,6 @@
failures)
(dired-log "%s `%s' to `%s' failed:\n%s\n"
operation from to err))))))))
- fn-list))
(cond
(dired-create-files-failures
(setq failures (nconc failures dired-create-files-failures))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/dired-aux.el,v,
Stefan Monnier <=