From b974201e0072c40f5848f6b1990decb20eb7bed0 Mon Sep 17 00:00:00 2001 From: Fabrizio Contigiani Date: Tue, 24 Oct 2023 12:10:09 -0300 Subject: [PATCH] Make outline faces colorful by default --- adwaita-dark-theme.el | 22 ++++++++++++++-------- 1 file changed, 14 insertions(+), 8 deletions(-) diff --git a/adwaita-dark-theme.el b/adwaita-dark-theme.el index 27af867..55ef11e 100644 --- a/adwaita-dark-theme.el +++ b/adwaita-dark-theme.el @@ -132,6 +132,12 @@ :group 'adwaita-dark-theme :type 'boolean) + +(defcustom adwaita-dark-theme-gray-outlines nil + "When non-nil, outline faces will be the same shade of gray." + :group 'adwaita-dark-theme + :type 'boolean) + ;; -------------------------------------------------------------------------- ;; ;; ;; Theme code @@ -437,14 +443,14 @@ `(message-cited-text ((,class (:foreground ,magenta)))) ;; outline - `(outline-1 ((,class (:foreground ,base-6 :weight bold)))) - `(outline-2 ((,class (:foreground ,base-7 :weight bold)))) - `(outline-3 ((,class (:foreground ,base-6 :weight bold)))) - `(outline-4 ((,class (:foreground ,base-5 :weight bold)))) - `(outline-5 ((,class (:foreground ,base-6 :weight bold)))) - `(outline-6 ((,class (:foreground ,base-7 :weight bold)))) - `(outline-7 ((,class (:foreground ,base-6 :weight bold)))) - `(outline-8 ((,class (:foreground ,base-5 :weight bold)))) + `(outline-1 ((,class (:foreground ,(if adwaita-dark-theme-gray-outlines base-6 blue) :weight bold)))) + `(outline-2 ((,class (:foreground ,(if adwaita-dark-theme-gray-outlines base-7 magenta) :weight bold)))) + `(outline-3 ((,class (:foreground ,(if adwaita-dark-theme-gray-outlines base-6 green) :weight bold)))) + `(outline-4 ((,class (:foreground ,(if adwaita-dark-theme-gray-outlines base-5 violet) :weight bold)))) + `(outline-5 ((,class (:foreground ,(if adwaita-dark-theme-gray-outlines base-6 teal) :weight bold)))) + `(outline-6 ((,class (:foreground ,(if adwaita-dark-theme-gray-outlines base-7 blue) :weight bold)))) + `(outline-7 ((,class (:foreground ,(if adwaita-dark-theme-gray-outlines base-6 magenta) :weight bold)))) + `(outline-8 ((,class (:foreground ,(if adwaita-dark-theme-gray-outlines base-5 green) :weight bold)))) ;; pulse `(pulse-highlight-start-face ((,class (:background ,base-5 :extend t))))