branch: externals/async
commit 424ecd8a28cd59fe7d2de3cb4b37a4224e34c123
Author: Thierry Volpiatto <[email protected]>
Commit: Thierry Volpiatto <[email protected]>
Fix compilation warning
* dired-async.el (dired-async-create-files): Ignore unused `from` in
cl-loop.
---
dired-async.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/dired-async.el b/dired-async.el
index 5428206..c798947 100644
--- a/dired-async.el
+++ b/dired-async.el
@@ -246,7 +246,7 @@ ESC or `q' to not overwrite any of the remaining files,
(setq async-quiet-switch
(if (and (boundp 'tramp-cache-read-persistent-data)
async-fn-list
- (cl-loop for (from . to) in async-fn-list
+ (cl-loop for (_from . to) in async-fn-list
thereis (file-remote-p to)))
"-q" "-Q"))
;; When failures have been printed to dired log add the date at bob.
