[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master 228ec4b 34/39: Handle errors file by file instead of retur
From: |
Thierry Volpiatto |
Subject: |
[elpa] master 228ec4b 34/39: Handle errors file by file instead of returning on first error. |
Date: |
Wed, 18 May 2016 18:02:54 +0000 (UTC) |
branch: master
commit 228ec4bb351a9e14e338b9cb09eeb4809957c909
Author: Thierry Volpiatto <address@hidden>
Commit: Thierry Volpiatto <address@hidden>
Handle errors file by file instead of returning on first error.
* dired-async.el (dired-async-create-files): Do it.
---
dired-async.el | 14 ++++++++------
1 file changed, 8 insertions(+), 6 deletions(-)
diff --git a/dired-async.el b/dired-async.el
index c6ff0b9..a6a1add 100644
--- a/dired-async.el
+++ b/dired-async.el
@@ -268,7 +268,6 @@ ESC or `q' to not overwrite any of the remaining files,
(async-start `(lambda ()
(require 'cl-lib) (require 'dired-aux) (require 'dired-x)
,(async-inject-variables
dired-async-env-variables-regexp)
- (condition-case err
(let ((dired-recursive-copies (quote always))
(dired-copy-preserve-time
,dired-copy-preserve-time))
@@ -295,11 +294,14 @@ ESC or `q' to not overwrite any of the remaining files,
;; Now run the FILE-CREATOR function on files.
(cl-loop with fn = (quote ,file-creator)
for (from . dest) in (quote
,async-fn-list)
- do (funcall fn from dest t)))
- (file-error
- (dired-log "%s: %s\n" (car err) (cdr err))
- (dired-log t)
- (with-current-buffer dired-log-buffer
+ do (condition-case err
+ (funcall fn from dest t)
+ (file-error
+ (dired-log "%s: %s\n" (car err)
(cdr err)))
+ nil))
+ (when (get-buffer dired-log-buffer)
+ (dired-log t)
+ (with-current-buffer dired-log-buffer
(write-region (point-min) (point-max)
,dired-async-log-file))))
,(dired-async-maybe-kill-ftp))
- [elpa] master a7e8cf3 30/39: When failures have been printed to dired log add the date at bob., (continued)
- [elpa] master a7e8cf3 30/39: When failures have been printed to dired log add the date at bob., Thierry Volpiatto, 2016/05/18
- [elpa] master dc63e41 27/39: Revert last commit., Thierry Volpiatto, 2016/05/18
- [elpa] master c9ddbbc 11/39: Merge pull request #62 from jwiegley/backup_files, Thierry Volpiatto, 2016/05/18
- [elpa] master ed05631 03/39: Assign copyrights to the FSF, add autoloads file, Thierry Volpiatto, 2016/05/18
- [elpa] master e35506f 18/39: Remove unuseful code never called., Thierry Volpiatto, 2016/05/18
- [elpa] master af8933d 20/39: Unquote all callbacks., Thierry Volpiatto, 2016/05/18
- [elpa] master a48e509 28/39: Ensure a new line is added when printing to dired log buffer., Thierry Volpiatto, 2016/05/18
- [elpa] master 4d6efb9 25/39: Handle error also on host when async-list of file is empty., Thierry Volpiatto, 2016/05/18
- [elpa] master 8632abd 39/39: Merge branch 'master' of git.sv.gnu.org:/srv/git/emacs/elpa, Thierry Volpiatto, 2016/05/18
- [elpa] master 8d1a26d 29/39: Remove unused commented code., Thierry Volpiatto, 2016/05/18
- [elpa] master 228ec4b 34/39: Handle errors file by file instead of returning on first error.,
Thierry Volpiatto <=
- [elpa] master 0b8fbed 23/39: Remove commented line, no code change., Thierry Volpiatto, 2016/05/18
- [elpa] master 3ec3fb6 02/39: Declare package-alist in async-bytecomp.., Thierry Volpiatto, 2016/05/18
- [elpa] master dd77b81 22/39: Fix formatting the help form in dired-create-files., Thierry Volpiatto, 2016/05/18
- [elpa] master 8d27590 21/39: Finally handle the failures correctly., Thierry Volpiatto, 2016/05/18
- [elpa] master 1763517 14/39: Add comment no code change., Thierry Volpiatto, 2016/05/18
- [elpa] master 9a82294 26/39: DRY use apply., Thierry Volpiatto, 2016/05/18
- [elpa] master 1c57dc3 31/39: Better handling of errors happening on child., Thierry Volpiatto, 2016/05/18
- [elpa] master dd09794 33/39: Fix success message on callback., Thierry Volpiatto, 2016/05/18
- [elpa] master 14170a4 35/39: Add more info in mode-line on failures., Thierry Volpiatto, 2016/05/18
- [elpa] master 6e29e82 17/39: Switch to lexical-binding., Thierry Volpiatto, 2016/05/18