branch: elpa/helm
commit 5dc5fa05370af1908cad7bc1261713c4df916e0e
Author: Thierry Volpiatto <thie...@posteo.net>
Commit: Thierry Volpiatto <thie...@posteo.net>
Update comments
---
helm-files.el | 5 ++---
1 file changed, 2 insertions(+), 3 deletions(-)
diff --git a/helm-files.el b/helm-files.el
index 86e6b8a0f0..5f5fd93435 100644
--- a/helm-files.el
+++ b/helm-files.el
@@ -5916,7 +5916,6 @@ and `dired-compress-files-alist'."
(format "%s exists, overwrite?"
(abbreviate-file-name ofile)))))
(message "Compression aborted"))
- ;; FIXME: provide mode-line notification like in delete files async.
(message "Compressing %d file(s) to `%s'..."
(length ifiles) (helm-basename ofile))
(process-put
@@ -5997,9 +5996,9 @@ and `dired-compress-files-alist'."
(setq helm-marked-candidates nil
helm-visible-mark-overlays nil)
(helm-force-update
- ;; select candidate before compress. If it can't, select candidate
- ;; after compress.
(let ((presel (helm-get-selection)))
+ ;; FIXME: Probably this would never happen, I see no cases here
where
+ ;; helm-get-selection doesn't exist.
(unless (file-exists-p presel)
(setq presel cfile))
(when presel
