Prevent "version control data is outdated" prompt

The prompt was too intrusive, so update vc state if buffer is modified
instead.
This commit is contained in:
Henrik Lissner 2020-03-14 22:04:30 -04:00
parent c1046231ce
commit 93521ba5be
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -48,16 +48,13 @@
(defun +magit--revert-buffer (buffer)
(with-current-buffer buffer
(kill-local-variable '+magit--stale-p)
(let ((buffer (or (buffer-base-buffer) (current-buffer))))
(if-let (file (buffer-file-name buffer))
(and (file-exists-p file)
(or (not (buffer-modified-p buffer))
(y-or-n-p
(format "Version control data is outdated in %s, but it is unsaved. Revert anyway?"
buffer)))
(revert-buffer t t))
(when (and vc-mode (fboundp 'vc-refresh-state))
(vc-refresh-state))))))
(let* ((buffer (or (buffer-base-buffer) (current-buffer)))
(file (buffer-file-name buffer)))
(if (or (buffer-modified-p buffer)
(and file (file-exists-p file)))
(when (bound-and-true-p vc-mode)
(vc-refresh-state))
(revert-buffer t t)))))
;;;###autoload
(defun +magit-mark-stale-buffers-h ()