Merge branch 'main' into 'main'

Make outline faces colorful by default and add option for gray-scale

See merge request jessieh/adwaita-dark-theme!1
This commit is contained in:
Jessie Hildebrandt 2023-11-28 16:20:07 +00:00
commit 9fb2b85d8c
1 changed files with 14 additions and 8 deletions

View File

@ -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
@ -438,14 +444,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))))