(Emacs/elisp)~adjusting faces in personal-light theme

This commit is contained in:
2024-09-08 02:59:37 +01:00
parent fa543ada1f
commit 4739f8798f

View File

@@ -4,14 +4,17 @@
(custom-theme-set-faces
'personal-light
'(button ((t (:inherit (link)))))
'(cursor ((t (:background "#00BBFF"))))
'(escape-glyph ((((background dark)) (:foreground "cyan")) (((type pc)) (:foreground "magenta")) (t (:foreground "brown"))))
'(eshell-ls-directory ((t (:foreground "DeepSkyBlue3" :weight bold))))
'(eshell-prompt ((t (:foreground "turquoise3" :weight bold))))
'(evil-mc-cursor-default-face ((t (:foreground "white" :background "black"))))
'(evil-mc-region-face ((t (:extend t :background "#94a2b2"))))
'(fixed-pitch ((t (:family "Monospace"))))
'(font-lock-bracket-face ((t (:inherit (font-lock-punctuation-face)))))
'(font-lock-builtin-face ((t (:foreground "#A020F0"))))
'(font-lock-comment-delimiter-face ((t (:inherit (font-lock-comment-face)))))
'(font-lock-comment-face ((t (:foreground "#204A87"))))
'(font-lock-constant-face ((t (:foreground "#F5666D"))))
'(font-lock-constant-face ((t (:foreground "#F5665D"))))
'(font-lock-delimiter-face ((t (:inherit (font-lock-punctuation-face)))))
'(font-lock-doc-face ((t (:inherit (font-lock-string-face)))))
'(font-lock-doc-markup-face ((t (:inherit (font-lock-constant-face)))))
@@ -43,6 +46,7 @@
'(lazy-highlight ((((class color) (min-colors 88) (background light)) (:distant-foreground "black" :background "paleturquoise")) (((class color) (min-colors 88) (background dark)) (:distant-foreground "white" :background "paleturquoise4")) (((class color) (min-colors 16)) (:distant-foreground "white" :background "turquoise3")) (((class color) (min-colors 8)) (:distant-foreground "white" :background "turquoise3")) (t (:underline (:color foreground-color :style line :position nil)))))
'(link ((t (:underline (:color foreground-color :style line :position nil) :foreground "#0066CC"))))
'(link-visited ((t (:underline (:color foreground-color :style line :position nil) :foreground "#6799CC"))))
'(magit-diff-context-highlight ((t (:inherit default))))
'(match ((((class color) (min-colors 88) (background light)) (:background "khaki1")) (((class color) (min-colors 88) (background dark)) (:background "RoyalBlue3")) (((class color) (min-colors 8) (background light)) (:foreground "black" :background "yellow")) (((class color) (min-colors 8) (background dark)) (:foreground "white" :background "blue")) (((type tty) (class mono)) (:inverse-video t)) (t (:background "gray"))))
'(minibuffer-prompt ((t (:weight bold :foreground "#0084C8"))))
'(mode-line ((t (:box (:line-width (1 . -1) :color nil :style released-button) :foreground "#2E3436" :background "white"))))