mirror of
https://github.com/doomemacs/doomemacs.git
synced 2026-02-03 14:21:44 -08:00
perf(magit): noop +magit-mark-stale-buffers-h if disabled
A little less work to do.
This commit is contained in:
parent
b2f8529683
commit
6e92ca594f
1 changed files with 10 additions and 9 deletions
|
|
@ -125,15 +125,16 @@ window that already exists in that direction. It will split otherwise."
|
|||
|
||||
Stale buffers are reverted when they are switched to, assuming they haven't been
|
||||
modified."
|
||||
(let ((visible-buffers (doom-visible-buffers nil t)))
|
||||
(dolist (buffer (buffer-list))
|
||||
(when (+magit--revertable-buffer-p buffer)
|
||||
(if (memq buffer visible-buffers)
|
||||
(progn
|
||||
(+magit--revert-buffer buffer)
|
||||
(cl-callf2 delq buffer visible-buffers)) ; hasten future lookups
|
||||
(with-current-buffer buffer
|
||||
(setq-local +magit--stale-p t)))))))
|
||||
(when +magit-auto-revert
|
||||
(let ((visible-buffers (doom-visible-buffers nil t)))
|
||||
(dolist (buffer (buffer-list))
|
||||
(when (+magit--revertable-buffer-p buffer)
|
||||
(if (memq buffer visible-buffers)
|
||||
(progn
|
||||
(+magit--revert-buffer buffer)
|
||||
(cl-callf2 delq buffer visible-buffers)) ; hasten future lookups
|
||||
(with-current-buffer buffer
|
||||
(setq-local +magit--stale-p t))))))))
|
||||
|
||||
;;;###autoload
|
||||
(defun +magit-revert-buffer-maybe-h ()
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue