More fixes to the theme.

This commit is contained in:
Howard Abrams 2024-12-16 17:05:09 -08:00
parent 3adc01620a
commit e40c57ff18

View file

@ -2,7 +2,7 @@
#+author: Howard Abrams #+author: Howard Abrams
#+date: 2024-06-18 #+date: 2024-06-18
#+filetags: emacs hamacs #+filetags: emacs hamacs
#+lastmod: [2024-11-26 Tue] #+lastmod: [2024-12-10 Tue]
A literate programming file for defining a warm, autumn, but subtle color theme for Emacs. A literate programming file for defining a warm, autumn, but subtle color theme for Emacs.
@ -158,6 +158,8 @@ And encapsulate them in a named list:
("yellow-lt" . "#d8bb77") ("yellow-lt" . "#d8bb77")
("green" . "#899d03") ("green" . "#899d03")
("green-lt" . "#b3bf8e") ("green-lt" . "#b3bf8e")
("dk-green" . "#55702c")
("dk-green-lt" . "#979e6e")
("blue" . "#6f8b93") ("blue" . "#6f8b93")
("blue-lt" . "#91b5bf") ("blue-lt" . "#91b5bf")
("purple" . "#893161") ("purple" . "#893161")
@ -348,7 +350,7 @@ Lets make a /theme/:
`(link ((t (:foreground ,link-color)))) `(link ((t (:foreground ,link-color))))
`(link-visited ((t (:foreground ,visited-color)))) `(link-visited ((t (:foreground ,visited-color))))
`(font-lock-comment-face ((t (:foreground ,gray-65)))) `(font-lock-comment-face ((t (:foreground ,gray-60))))
`(font-lock-comment-delimiter-face ((t (:foreground ,gray-50)))) `(font-lock-comment-delimiter-face ((t (:foreground ,gray-50))))
`(font-lock-string-face ((t (:foreground ,gray-75)))) `(font-lock-string-face ((t (:foreground ,gray-75))))
`(font-lock-type-face ((t (:foreground ,green-lt)))) `(font-lock-type-face ((t (:foreground ,green-lt))))
@ -378,8 +380,8 @@ Lets make a /theme/:
`(org-document-info-keyword ((t (:foreground ,gray-70)))) `(org-document-info-keyword ((t (:foreground ,gray-70))))
`(org-meta-line ((t (:foreground ,gray-55)))) `(org-meta-line ((t (:foreground ,gray-55))))
`(org-drawer ((t (:foreground ,purple-dk :height ,smallest)))) `(org-drawer ((t (:foreground ,purple-dk :height ,smallest))))
`(org-special-keyword ((t (:foreground ,purple :height ,smaller)))) `(org-special-keyword ((t (:foreground ,purple2 :height ,small))))
`(org-property-value ((t (:foreground ,purple-lt :height ,smaller)))) `(org-property-value ((t (:foreground ,purple2-lt :height ,small))))
`(org-table ((t (:foreground ,purple-lt)))) `(org-table ((t (:foreground ,purple-lt))))
`(org-quote ((t (:inherit variable-pitch :slant italic :height 0.9)))) `(org-quote ((t (:inherit variable-pitch :slant italic :height 0.9))))
@ -422,6 +424,9 @@ Lets make a /theme/:
`(ahs-face ((t (:foreground ,orange-lt :background unspecified)))) `(ahs-face ((t (:foreground ,orange-lt :background unspecified))))
`(ahs-plugin-default-face ((t (:foreground unspecified :background unspecified)))) `(ahs-plugin-default-face ((t (:foreground unspecified :background unspecified))))
`(mastodon-display-name-face ((t (:foreground ,orange-lt))))
`(mastodon-boosted-face ((t (:foreground ,green-lt))))
)) ))
#+END_SRC #+END_SRC