diff options
| -rw-r--r-- | feebleline.el | 11 |
1 files changed, 9 insertions, 2 deletions
diff --git a/feebleline.el b/feebleline.el index 039d327..97a2b6b 100644 --- a/feebleline.el +++ b/feebleline.el @@ -164,7 +164,10 @@ window-divider-default-places (quote bottom-only)) (window-divider-mode t) (setq-default mode-line-format nil) - (setq mode-line-format nil)) + (walk-windows (lambda (window) + (with-selected-window window + (setq mode-line-format nil))) + nil t)) (defun feebleline-legacy-settings-on () "Some default settings for EMACS < 25." @@ -222,6 +225,7 @@ Returns a pair with desired column and string." (with-current-buffer feebleline--minibuf (erase-buffer))) + ;;;###autoload (define-minor-mode feebleline-mode "Replace modeline with a slimmer proxy." @@ -242,7 +246,10 @@ Returns a pair with desired column and string." ;; Deactivation: (set-face-attribute 'mode-line nil :height 1.0) (setq-default mode-line-format feebleline--mode-line-format-previous) - (setq mode-line-format feebleline--mode-line-format-previous) + (walk-windows (lambda (window) + (with-selected-window window + (setq mode-line-format feebleline--mode-line-format-previous))) + nil t) (cancel-timer feebleline--msg-timer) (remove-hook 'focus-in-hook 'feebleline--insert-ignore-errors) (force-mode-line-update) |