X-Git-Url: https://git.notmuchmail.org/git?a=blobdiff_plain;f=emacs%2Fnotmuch-jump.el;h=5ec8eb9c8e3e06839a6e653ef554c50429b34e77;hb=3df2281746d57abbb45790ecb432ef40533c30bc;hp=6fab5a792ec6b4da7daaacd2ad789653403b49ad;hpb=9d6f4641d17a6100cb8d96bc1e09d3d4999c34f3;p=notmuch diff --git a/emacs/notmuch-jump.el b/emacs/notmuch-jump.el index 6fab5a79..5ec8eb9c 100644 --- a/emacs/notmuch-jump.el +++ b/emacs/notmuch-jump.el @@ -62,6 +62,11 @@ fast way to jump to a saved search from anywhere in Notmuch." (error "To use notmuch-jump, %s" "please customize shortcut keys in notmuch-saved-searches.")))) +(defface notmuch-jump-key + '((t :inherit minibuffer-prompt)) + "Default face used for keys in `notmuch-jump' and related." + :group 'notmuch-faces) + (defvar notmuch-jump--action nil) ;;;###autoload @@ -123,7 +128,7 @@ buffer." ;; Format each action (mapcar (pcase-lambda (`(,key ,desc)) (setq key (format-kbd-macro key)) - (concat (propertize key 'face 'minibuffer-prompt) + (concat (propertize key 'face 'notmuch-jump-key) (make-string (- key-width (length key)) ? ) " " desc)) action-map)))