(vc-set-mode-line-busy-indicator): Use shorter message

and quieter face (not a warning).
This commit is contained in:
Nick Roberts 2008-02-29 22:09:56 +00:00
parent 6867f3ddf6
commit 14b7b2c492

View file

@ -1063,14 +1063,8 @@ BUF defaults to \"*vc*\", can be a string and will be created if necessary."
(defun vc-set-mode-line-busy-indicator ()
(setq mode-line-process
;; Deliberate overstatement, but power law respected.
;; (The message is ephemeral, so we make it loud.) --ttn
(propertize " (incomplete/in progress)"
'face (if (featurep 'compile)
;; ttn's preferred loudness
'compilation-warning
;; suitably available fallback
font-lock-warning-face)
(propertize " [waiting...]"
'face 'font-lock-variable-name-face
'help-echo
"A VC command is in progress in this buffer")))