branch: elpa/git-commit commit d520ce330677ba5bf4aeba5af64b6da71d526f70 Author: Jonas Bernoulli <jo...@bernoul.li> Commit: Jonas Bernoulli <jo...@bernoul.li>
magit-profile-refresh-buffer: New command --- lisp/magit-mode.el | 12 ++++++++++++ 1 file changed, 12 insertions(+) diff --git a/lisp/magit-mode.el b/lisp/magit-mode.el index 62ff5bbe99..585a2318ee 100644 --- a/lisp/magit-mode.el +++ b/lisp/magit-mode.el @@ -1065,6 +1065,18 @@ Run hooks `magit-pre-refresh-hook' and `magit-post-refresh-hook'." (float-time (time-subtract (current-time) magit-refresh-start-time))))))) +(defun magit-profile-refresh-buffer () + "Profile refreshing the current Magit buffer." + (interactive) + (require (quote elp)) + (when (fboundp 'elp-reset-all) + (elp-reset-all) + (elp-instrument-package "magit-") + (elp-instrument-package "forge-") + (magit-refresh-buffer) + (elp-results) + (elp-reset-all))) + ;;; Save File-Visiting Buffers (defvar magit--disable-save-buffers nil)