emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/helm c36cddeb66 6/9: Rename helm-ff--rsync-progress-bar fr


From: ELPA Syncer
Subject: [nongnu] elpa/helm c36cddeb66 6/9: Rename helm-ff--rsync-progress-bar from helm-ff--rsync-mode-line-string
Date: Wed, 19 Jul 2023 13:02:13 -0400 (EDT)

branch: elpa/helm
commit c36cddeb66d99dd721705e88b97e313ff910ea7c
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>

    Rename helm-ff--rsync-progress-bar from helm-ff--rsync-mode-line-string
---
 helm-files.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/helm-files.el b/helm-files.el
index 248c7b84f2..bf8a59388d 100644
--- a/helm-files.el
+++ b/helm-files.el
@@ -1303,7 +1303,7 @@ ACTION can be `rsync' or any action supported by 
`helm-dired-action'."
                             ;; nil) when process is not ready.
                             ""))))))
 
-(defun helm-ff--rsync-mode-line-string (progbar proc)
+(defun helm-ff--rsync-progress-bar (progbar proc)
   ;; progbar == "          2,83G  92%   98,65MB/s    0:00:02  "
   (let ((infos (split-string
                 (replace-regexp-in-string
@@ -1433,7 +1433,7 @@ DEST must be a directory.  SWITCHES when unspecified 
default to
                        (buffer-substring-no-properties
                         (point) (point-at-eol))))))
       ;; Now format the string for the mode-line.
-      (let ((ml-str (helm-ff--rsync-mode-line-string progbar proc)))
+      (let ((ml-str (helm-ff--rsync-progress-bar progbar proc)))
         (setq ml-str (propertize ml-str 'help-echo
                                  (format "%s->%s" (process-name proc) fname)))
         ;; Now associate the formatted



reply via email to

[Prev in Thread] Current Thread [Next in Thread]