From 14b7b2c492544dff9ba8c4e7d081120c21674a0c Mon Sep 17 00:00:00 2001 From: Nick Roberts Date: Fri, 29 Feb 2008 22:09:56 +0000 Subject: [PATCH] (vc-set-mode-line-busy-indicator): Use shorter message and quieter face (not a warning). --- lisp/vc.el | 10 ++-------- 1 file changed, 2 insertions(+), 8 deletions(-) diff --git a/lisp/vc.el b/lisp/vc.el index ceed375639d..ab9277a35f1 100644 --- a/lisp/vc.el +++ b/lisp/vc.el @@ -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"))) -- 2.39.2