diff options
| author | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2020-06-29 18:28:36 +0200 |
|---|---|---|
| committer | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2020-06-29 19:23:58 +0200 |
| commit | d19592f593755a0d3daf09b4312daa0731d01dd6 (patch) | |
| tree | f4f0f441b39cdbe844650b3261c18a866ae964d9 /helm-bookmark.el | |
| parent | 4ca209bf5f217d883b948b1655466b34dcd8bc87 (diff) | |
Use :extend attr in all defface
Diffstat (limited to 'helm-bookmark.el')
| -rw-r--r-- | helm-bookmark.el | 24 |
1 files changed, 16 insertions, 8 deletions
diff --git a/helm-bookmark.el b/helm-bookmark.el index ccbae898..6954f256 100644 --- a/helm-bookmark.el +++ b/helm-bookmark.el @@ -56,42 +56,50 @@ (defface helm-bookmark-info - '((t (:foreground "green"))) + `((t ,@(and (>= emacs-major-version 27) '(:extend t)) + :foreground "green")) "Face used for W3m Emacs bookmarks (not w3m bookmarks)." :group 'helm-bookmark) (defface helm-bookmark-w3m - '((t (:foreground "yellow"))) + `((t ,@(and (>= emacs-major-version 27) '(:extend t)) + :foreground "yellow")) "Face used for W3m Emacs bookmarks (not w3m bookmarks)." :group 'helm-bookmark) (defface helm-bookmark-gnus - '((t (:foreground "magenta"))) + `((t ,@(and (>= emacs-major-version 27) '(:extend t)) + :foreground "magenta")) "Face used for Gnus bookmarks." :group 'helm-bookmark) (defface helm-bookmark-man - '((t (:foreground "Orange4"))) + `((t ,@(and (>= emacs-major-version 27) '(:extend t)) + :foreground "Orange4")) "Face used for Woman/man bookmarks." :group 'helm-bookmark) (defface helm-bookmark-file - '((t (:foreground "Deepskyblue2"))) + `((t ,@(and (>= emacs-major-version 27) '(:extend t)) + :foreground "Deepskyblue2")) "Face used for file bookmarks." :group 'helm-bookmark) (defface helm-bookmark-file-not-found - '((t (:foreground "Slategray4"))) + `((t ,@(and (>= emacs-major-version 27) '(:extend t)) + :foreground "Slategray4")) "Face used for file bookmarks." :group 'helm-bookmark) (defface helm-bookmark-directory - '((t (:inherit helm-ff-directory))) + `((t ,@(and (>= emacs-major-version 27) '(:extend t)) + :inherit helm-ff-directory)) "Face used for file bookmarks." :group 'helm-bookmark) (defface helm-bookmark-addressbook - '((t (:foreground "tomato"))) + `((t ,@(and (>= emacs-major-version 27) '(:extend t)) + :foreground "tomato")) "Face used for addressbook bookmarks." :group 'helm-bookmark) |