Re: Recursive copies in dired abort on first error

[Sven Joachim]

Richard Stallman wrote:
> Anyway, I think I fixed the confusing `29 out of 2 files' message.
> Please try this:

It leads to an error, e.g. trying to copy /etc/shadow:

Debugger entered--Lisp error: (wrong-type-argument number-or-marker-p ("shadow" 
"shadow"))
  dired-plural-s(("shadow" "shadow"))
  (format "%s failed for %d file%s in %d requests" operation (length failures) 
(dired-plural-s failures) total)
  (dired-log-summary (format "%s failed for %d file%s in %d requests" operation 
(length failures) (dired-plural-s failures) total) failures)
  (cond (dired-create-files-failures (setq failures ...) (dired-log-summary ... failures)) (failures (dired-log-summary ... failures)) (skipped 
(dired-log-summary ... skipped)) (t (message "%s: %s file%s" operation success-count ...)))
  (let (dired-create-files-failures failures skipped (success-count 0) (total ...)) (let (to overwrite-query overwrite-backup-query) (mapcar ... 
fn-list)) (cond (dired-create-files-failures ... ...) (failures ...) (skipped ...) (t ...)))
  dired-create-files(dired-copy-file "Copy" ("/etc/shadow") (lambda (from) 
(expand-file-name (file-name-nondirectory from) target)) 67)
  (if (and (consp into-dir) (functionp ...)) (apply (car into-dir) operation rfn-list fn-list target (cdr into-dir)) (if (not ...) (error "Marked %s: 
target must be a directory: %s" operation target)) (or into-dir (setq target ...)) (dired-create-files file-creator operation fn-list (if into-dir ... 
...) marker-char))
  (let* ((fn-list ...) (rfn-list ...) (dired-one-file ...) (target-dir ...) (default ...) (target ...) (into-dir ...)) (if (and ... ...) (apply ... 
operation rfn-list fn-list target ...) (if ... ...) (or into-dir ...) (dired-create-files file-creator operation fn-list ... marker-char)))
  dired-do-create-files(copy dired-copy-file "Copy" nil 67 nil nil)
  (let ((dired-recursive-copies dired-recursive-copies)) (dired-do-create-files (quote copy) (function dired-copy-file) "Copy" arg 
dired-keep-marker-copy nil dired-copy-how-to-fn))
  dired-do-copy(nil)
  call-interactively(dired-do-copy)