# HG changeset patch # User Glenn Morris # Date 1205204338 0 # Node ID 1fc51cacf009337d9db587ce0e8b393601c31ccb # Parent fec088bf4a02b61414eb2782b5c32cd3ddfb094b (vc-set-mode-line-busy-indicator): Use mode-line-emphasis face. diff -r fec088bf4a02 -r 1fc51cacf009 lisp/vc.el --- a/lisp/vc.el Tue Mar 11 02:58:23 2008 +0000 +++ b/lisp/vc.el Tue Mar 11 02:58:58 2008 +0000 @@ -1065,10 +1065,10 @@ (defun vc-set-mode-line-busy-indicator () (setq mode-line-process - (propertize " [waiting...]" - 'face 'font-lock-variable-name-face - 'help-echo - "A VC command is in progress in this buffer"))) + (concat " " (propertize "[waiting...]" + 'face 'mode-line-emphasis + 'help-echo + "A VC command is in progress in this buffer")))) (defun vc-exec-after (code) "Eval CODE when the current buffer's process is done.