diff options
author | jao <jao@gnu.org> | 2022-08-07 00:05:39 +0100 |
---|---|---|
committer | jao <jao@gnu.org> | 2022-08-07 00:05:39 +0100 |
commit | d1cf6b3cad9211f41a9d43d02d0e4bf6f10375e5 (patch) | |
tree | 7827ad618be47a50c9f6c035e2bd045277ccda0d /lib | |
parent | 983e7375af65594411c842503e1a8e46086df50b (diff) | |
download | elibs-d1cf6b3cad9211f41a9d43d02d0e4bf6f10375e5.tar.gz elibs-d1cf6b3cad9211f41a9d43d02d0e4bf6f10375e5.tar.bz2 |
refactoring nit
Diffstat (limited to 'lib')
-rw-r--r-- | lib/eos/jao-mode-line.el | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/lib/eos/jao-mode-line.el b/lib/eos/jao-mode-line.el index b3db94b..843e0b4 100644 --- a/lib/eos/jao-mode-line.el +++ b/lib/eos/jao-mode-line.el @@ -120,19 +120,18 @@ (if inactive jao-mode-line--inactive-face jao-mode-line--face))) (defun jao-mode-line-adjust-faces () - (let ((bg (frame-parameter nil 'background-color))) + (let ((bg (and (display-graphic-p) (frame-parameter nil 'background-color))) + (ol (and (display-graphic-p) jao-minibuffer-active-buffer-line-color)) + (ul (and (display-graphic-p) jao-minibuffer-inactive-buffer-line-color))) (jao-mode-line--extract-face nil) (jao-mode-line--extract-face t) (set-face-attribute 'mode-line nil :box nil :height 1 :background bg :foreground bg - :overline jao-minibuffer-active-buffer-line-color - :underline jao-minibuffer-inactive-buffer-line-color - :extend t) + :overline ol :underline ul :extend t) (set-face-attribute 'mode-line-inactive nil :box nil :height 1 :background bg :foreground bg ;; :overline bg - :underline jao-minibuffer-inactive-buffer-line-color - :extend t))) + :underline ul :extend t))) ;;;###autoload (defun jao-mode-line-add-to-minibuffer (&optional order) |