From 28d1023bbeea7c5c6b0791a48852a12f14785067 Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Tue, 30 Jul 2019 01:46:15 +0300 Subject: [PATCH] Highlight keyboard macro recording mode with read color in the mode-line * lisp/bindings.el (minor-mode-alist): Propertize " Def" with 'error' face for defining-kbd-macro. (Bug#36564) --- lisp/bindings.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/bindings.el b/lisp/bindings.el index 5205d497ef5..64842c4e1ff 100644 --- a/lisp/bindings.el +++ b/lisp/bindings.el @@ -655,11 +655,11 @@ okay. See `mode-line-format'.") (put 'minor-mode-alist 'risky-local-variable t) ;; Don't use purecopy here--some people want to change these strings. (setq minor-mode-alist - '((abbrev-mode " Abbrev") + `((abbrev-mode " Abbrev") (overwrite-mode overwrite-mode) (auto-fill-function " Fill") ;; not really a minor mode... - (defining-kbd-macro " Def"))) + (defining-kbd-macro ,(propertize " Def" 'face 'error)))) ;; These variables are used by autoloadable packages. ;; They are defined here so that they do not get overridden -- 2.39.2