mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-06-14 04:21:24 +00:00
vc-finish-logentry: Skip displaying async command buffer sometimes
* lisp/vc/vc-dispatcher.el (vc-finish-logentry): Don't display the async command buffer if vc-display-failed-async-commands is non-nil.
This commit is contained in:
parent
5789621632
commit
8f9607d532
1 changed files with 7 additions and 1 deletions
|
|
@ -1021,7 +1021,13 @@ the buffer contents as a comment."
|
|||
(t
|
||||
(quit-windows-on logbuf nil 0)))
|
||||
|
||||
(when (eq (car-safe log-operation-ret) 'async)
|
||||
(when (and (eq (car-safe log-operation-ret) 'async)
|
||||
;; For an async commit, if we will display the buffer
|
||||
;; if the command fails, don't display it sooner.
|
||||
;; The output from successful commit commands isn't
|
||||
;; interesting and VC-Dir will show the files as being
|
||||
;; committed while it's in progress.
|
||||
(not vc-display-failed-async-commands))
|
||||
(vc--display-async-command-buffer (process-buffer
|
||||
(cadr log-operation-ret))))
|
||||
|
||||
|
|
|
|||
Loading…
Reference in a new issue