debian/notmuch
1
0
Fork 0
mirror of https://git.notmuchmail.org/git/notmuch synced 2024-11-25 04:18:08 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

emacs: fix notmuch-search-line-faces defcustom

Browse source 
In commit 2a7b11b064 the default value
for notmuch-search-line-faces was changed so that it didn't match the
specification in the corresponding defcustom. This meant that it was
difficult for the user to customize this variable as they got a type
mismatch error.

Note anyone who had already customised this variable would not see
this bug as their customisation would match the defcustom.
This commit is contained in:
Mark Walters 2016-10-15 10:40:48 +01:00 committed by David Bremner
parent f575a346df
commit a4331bf138
1 changed files with 12 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
emacs/notmuch.el
View file

@ -669,9 +669,16 @@ of the result."
(goto-char (point-min)) (goto-char (point-min))
(forward-line (1- notmuch-search-target-line))))))))) (forward-line (1- notmuch-search-target-line)))))))))
(define-widget 'notmuch--custom-face-edit 'lazy
"Custom face edit with a tag Edit Face"
;; I could not persuage custom-face-edit to respect the :tag
;; property so create a widget specially
:tag "Manually specify face"
:type 'custom-face-edit)
(defcustom notmuch-search-line-faces (defcustom notmuch-search-line-faces
'(("unread" 'notmuch-search-unread-face) '(("unread" . notmuch-search-unread-face)
("flagged" 'notmuch-search-flagged-face)) ("flagged" . notmuch-search-flagged-face))
"Alist of tags to faces for line highlighting in notmuch-search. "Alist of tags to faces for line highlighting in notmuch-search.
Each element looks like (TAG . FACE). Each element looks like (TAG . FACE).
A thread with TAG will have FACE applied. A thread with TAG will have FACE applied.
@ -689,7 +696,9 @@ matching tags are merged, with earlier attributes overriding
later. A message having both \"deleted\" and \"unread\" tags with later. A message having both \"deleted\" and \"unread\" tags with
the above settings would have a green foreground and blue the above settings would have a green foreground and blue
background." background."
:type '(alist :key-type (string) :value-type (custom-face-edit)) :type '(alist :key-type (string)
:value-type (radio (face :tag "Face name")
(notmuch--custom-face-edit)))
:group 'notmuch-search :group 'notmuch-search
:group 'notmuch-faces) :group 'notmuch-faces)