branch: elpa/magit commit 9dbc5493bda71200afbad6b41954136d2e1fb391 Author: Jonas Bernoulli <jo...@bernoul.li> Commit: Jonas Bernoulli <jo...@bernoul.li>
magit-revert-buffer: New function Let's not complicate `magit-refresh-buffer' just because `revert-buffer' takes additional arguments, which aren't relevant for Magit buffers. We'll add our own argument to this function in a few commits. --- lisp/magit-mode.el | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/lisp/magit-mode.el b/lisp/magit-mode.el index e02e7a958d..b08c26fb32 100644 --- a/lisp/magit-mode.el +++ b/lisp/magit-mode.el @@ -570,7 +570,7 @@ Magit is documented in info node `(magit)'." (magit-hack-dir-local-variables) (face-remap-add-relative 'header-line 'magit-header-line) (setq mode-line-process (magit-repository-local-get 'mode-line-process)) - (setq-local revert-buffer-function #'magit-refresh-buffer) + (setq-local revert-buffer-function #'magit-revert-buffer) (setq-local bookmark-make-record-function #'magit--make-bookmark) (setq-local imenu-create-index-function #'magit--imenu-create-index) (setq-local imenu-default-goto-function #'magit--imenu-goto-function) @@ -1065,7 +1065,7 @@ Run hooks `magit-pre-refresh-hook' and `magit-post-refresh-hook'." (defvar-local magit--refresh-start-time nil) -(defun magit-refresh-buffer (&rest _ignore) +(defun magit-refresh-buffer () "Refresh the current Magit buffer." (interactive) (let ((magit--refresh-start-time (current-time)) @@ -1114,6 +1114,10 @@ Run hooks `magit-pre-refresh-hook' and `magit-post-refresh-hook'." (message "Refreshing buffer `%s'...done (%.3fs)" (buffer-name) (float-time (time-since magit--refresh-start-time))))))) +(defun magit-revert-buffer (_ignore-auto _noconfirm) + "Wrapper around `magit-refresh-buffer' suitable as `revert-buffer-function'." + (magit-refresh-buffer)) + (defun magit-profile-refresh-buffer () "Profile refreshing the current Magit buffer." (interactive)