branch: elpa/magit
commit d01d77204f727f5d814186d287180046039270e1
Author: Jonas Bernoulli <jo...@bernoul.li>
Commit: Jonas Bernoulli <jo...@bernoul.li>

    magit--refresh-start-time: Make private and only let-bind
---
 lisp/magit-diff.el |  2 +-
 lisp/magit-mode.el | 12 ++++++------
 2 files changed, 7 insertions(+), 7 deletions(-)

diff --git a/lisp/magit-diff.el b/lisp/magit-diff.el
index 85459f6570..663bc38f6c 100644
--- a/lisp/magit-diff.el
+++ b/lisp/magit-diff.el
@@ -2635,7 +2635,7 @@ function errors."
 (defun magit-diff-expansion-threshold (section)
   "Keep new diff sections collapsed if washing takes too long."
   (and (magit-file-section-p section)
-       (> (float-time (time-since magit-refresh-start-time))
+       (> (float-time (time-since magit--refresh-start-time))
           magit-diff-expansion-threshold)
        'hide))
 
diff --git a/lisp/magit-mode.el b/lisp/magit-mode.el
index e89d93b956..e02e7a958d 100644
--- a/lisp/magit-mode.el
+++ b/lisp/magit-mode.el
@@ -1063,15 +1063,15 @@ Run hooks `magit-pre-refresh-hook' and 
`magit-post-refresh-hook'."
     (with-current-buffer buffer (magit-refresh-buffer)))
   (magit-run-hook-with-benchmark 'magit-post-refresh-hook))
 
-(defvar-local magit-refresh-start-time nil)
+(defvar-local magit--refresh-start-time nil)
 
 (defun magit-refresh-buffer (&rest _ignore)
   "Refresh the current Magit buffer."
   (interactive)
-  (setq magit-refresh-start-time (current-time))
-  (let ((refresh (intern (format "%s-refresh-buffer"
-                                 (substring (symbol-name major-mode) 0 -5))))
-        (magit--refresh-cache (or magit--refresh-cache (list (cons 0 0)))))
+  (let ((magit--refresh-start-time (current-time))
+        (magit--refresh-cache (or magit--refresh-cache (list (cons 0 0))))
+        (refresh (intern (format "%s-refresh-buffer"
+                                 (substring (symbol-name major-mode) 0 -5)))))
     (when (functionp refresh)
       (when magit-refresh-verbose
         (message "Refreshing buffer `%s'..." (buffer-name)))
@@ -1112,7 +1112,7 @@ Run hooks `magit-pre-refresh-hook' and 
`magit-post-refresh-hook'."
         (set-buffer-modified-p nil))
       (when magit-refresh-verbose
         (message "Refreshing buffer `%s'...done (%.3fs)" (buffer-name)
-                 (float-time (time-since magit-refresh-start-time)))))))
+                 (float-time (time-since magit--refresh-start-time)))))))
 
 (defun magit-profile-refresh-buffer ()
   "Profile refreshing the current Magit buffer."

Reply via email to