summaryrefslogtreecommitdiff
path: root/lisp/dired-aux.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1997-04-01 04:26:33 +0000
committerRichard M. Stallman <rms@gnu.org>1997-04-01 04:26:33 +0000
commit4f1d7d31737310082d0e03b0007d0c25db175480 (patch)
tree3549ae8fc2cbd5075cbea4e12067a107d266e39d /lisp/dired-aux.el
parentc0b7b21c1271c9a53f15489485a104f1ba1d583f (diff)
downloademacs-4f1d7d31737310082d0e03b0007d0c25db175480.tar.gz
(dired-copy-file): Handle file-date-error.
Diffstat (limited to 'lisp/dired-aux.el')
-rw-r--r--lisp/dired-aux.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el
index ebab6fee438..4588c8e8bcf 100644
--- a/lisp/dired-aux.el
+++ b/lisp/dired-aux.el
@@ -949,7 +949,10 @@ Special value `always' suppresses confirmation.")
;;;###autoload
(defun dired-copy-file (from to ok-flag)
(dired-handle-overwrite to)
- (copy-file from to ok-flag dired-copy-preserve-time))
+ (condition-case ()
+ (copy-file from to ok-flag dired-copy-preserve-time)
+ (file-date-error (message "Can't set date")
+ (sit-for 1))))
;;;###autoload
(defun dired-rename-file (from to ok-flag)