From 5dc5fa05370af1908cad7bc1261713c4df916e0e Mon Sep 17 00:00:00 2001 From: Thierry Volpiatto Date: Mon, 18 Mar 2024 09:15:49 +0100 Subject: [PATCH] Update comments --- helm-files.el | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/helm-files.el b/helm-files.el index 86e6b8a0f..5f5fd9343 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