diff options
Diffstat (limited to 'lib/eos/jao-minibuffer.el')
-rw-r--r-- | lib/eos/jao-minibuffer.el | 17 |
1 files changed, 10 insertions, 7 deletions
diff --git a/lib/eos/jao-minibuffer.el b/lib/eos/jao-minibuffer.el index cd63daa..212d738 100644 --- a/lib/eos/jao-minibuffer.el +++ b/lib/eos/jao-minibuffer.el @@ -136,12 +136,7 @@ (defun jao-minibuffer-add-msg-variable (variable-name &optional order) (jao-minibuffer--add-variable 'jao-minibuffer-msg-info variable-name order)) -;;;###autoload -(defun jao-minibuffer-add-mode-line (order) - (setq jao-minibuffer--original-modeline mode-line-format) - (setq-default mode-line-format '(" ")) - (dolist (b (buffer-list)) - (with-current-buffer b (setq-local mode-line-format '(" ")))) +(defun jao-minibuffer-adjust-mode-line-faces () (let ((bg (face-attribute 'default :background))) (set-face-attribute 'mode-line nil :box nil :height 1 :background bg :foreground bg @@ -152,7 +147,15 @@ :background bg :foreground bg :overline nil :underline jao-minibuffer-inactive-buffer-line-color - :extend t)) + :extend t))) + +;;;###autoload +(defun jao-minibuffer-add-mode-line (order) + (setq jao-minibuffer--original-modeline mode-line-format) + (setq-default mode-line-format '(" ")) + (dolist (b (buffer-list)) + (with-current-buffer b (setq-local mode-line-format '(" ")))) + (jao-minibuffer-adjust-mode-line-faces) (advice-add 'force-mode-line-update :after #'jao-minibuffer-refresh) (advice-add 'select-window :after #'jao-minibuffer-refresh) ;; (add-hook 'window-selection-change-functions #'jao-minibuffer-refresh) |