diff options
| author | Craig Jennings <c@cjennings.net> | 2024-04-28 21:21:02 -0500 |
|---|---|---|
| committer | Craig Jennings <c@cjennings.net> | 2024-04-28 21:21:02 -0500 |
| commit | 53fc9c40c16a8d7b7f598350838717485756f547 (patch) | |
| tree | 30b4cb836ba593e1bdae56675dfd3629774f26aa | |
| parent | 3d207c669a873035ecaf2679e838969cd0625f9f (diff) | |
moving to Emacs built-in named facesdevelop
| -rw-r--r-- | feebleline.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/feebleline.el b/feebleline.el index 25ed62e..89ac71d 100644 --- a/feebleline.el +++ b/feebleline.el @@ -96,7 +96,7 @@ This buffer is primarily used to overwrite the echo area.") ;; -------------------------- Line And Column Element -------------------------- (defface feebleline-line-column-face - '((t :inherit 'default :foreground "#E37464")) + '((t :inherit 'font-lock-number-face)) "The default face used to display version control project names and branches." :group 'feebleline) @@ -110,12 +110,12 @@ For example, the string for line 120 and column 15 would be ' 120:15 '." ;; ----------------- Buffer Name Or File Name With Path Element ---------------- (defface feebleline-dir-name-face - '((t :inherit 'default :foreground "#5E4D37")) + '((t :inherit 'font-lock-comment-face)) "The default face used to display directory paths." :group 'feebleline) (defface feebleline-buffer-name-face - '((t :inherit 'default :foreground "#2B61B6")) + '((t :inherit 'font-lock-function-name-face)) "The default face used to display file and buffer names." :group 'feebleline) @@ -139,7 +139,7 @@ For example, the string for line 120 and column 15 would be ' 120:15 '." ;; --------------------------- VC Information Element -------------------------- (defface feebleline-vc-info-face - '((t :inherit 'default :foreground "#94E151")) + '((t :inherit 'font-lock-warning-face)) "The default face used to display version control project names and branches." :group 'feebleline) @@ -179,7 +179,7 @@ When the project name doesn't exist, return nil." (feebleline-file-directory :face feebleline-dir-name-face :post "") ;; the message to invalid face reference is with file-or-buffer-name ;; here in the next line when it tries to apply to file or buffer name - (feebleline-file-or-buffer-name :post "") + (feebleline-file-or-buffer-name :face feebleline-buffer-name-face :post "") (feebleline-buffer-modified-star :face feebleline-buffer-name-face) (feebleline-line-column-info :face feebleline-line-column-face) ) |
