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

Emacs: Fix notmuch-message-summary-face definition

Browse source 
Emacs face definition forms are either

    ((DISPLAY . PLIST)
     (DISPLAY . PLIST))

or

    ((DISPLAY PLIST)   ;For backward compatibility.
     (DISPLAY PLIST))

Commit a2388bc56e (2020-08-08) follows
neither of the correct formats. It defines:

    `((((class color) (background light))
       ,@(and (>= emacs-major-version 27) '(:extend t))
       (:background "#f0f0f0"))
      (((class color) (background dark))
       ,@(and (>= emacs-major-version 27) '(:extend t))
       (:background "#303030")))

which produces:

    ((DISPLAY
      :extend t (:background "#f0f0f0"))
     (DISPLAY
      :extend t (:background "#303030")))

And that is wrong format.

This change fixes the face definition form to produce:

    ((DISPLAY
      :extend t :background "#f0f0f0")
     (DISPLAY
      :extend t :background "#303030"))

which follows the (DISPLAY . PLIST) format (see above).
This commit is contained in:
Teemu Likonen 2020-08-16 20:13:23 +03:00 committed by David Bremner
parent d6f3694188
commit 3512e2bc83
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
emacs/notmuch.el
View file

@ -275,10 +275,10 @@ there will be called at other points of notmuch execution."
(defface notmuch-message-summary-face (defface notmuch-message-summary-face
`((((class color) (background light)) `((((class color) (background light))
,@(and (>= emacs-major-version 27) '(:extend t)) ,@(and (>= emacs-major-version 27) '(:extend t))
(:background "#f0f0f0")) :background "#f0f0f0")
(((class color) (background dark)) (((class color) (background dark))
,@(and (>= emacs-major-version 27) '(:extend t)) ,@(and (>= emacs-major-version 27) '(:extend t))
(:background "#303030"))) :background "#303030"))
"Face for the single-line message summary in notmuch-show-mode." "Face for the single-line message summary in notmuch-show-mode."
:group 'notmuch-show :group 'notmuch-show
:group 'notmuch-faces) :group 'notmuch-faces)