Skip to content

Commit

Permalink
ensure that mode-line-format is always a list (#27)
Browse files Browse the repository at this point in the history
  • Loading branch information
dakling committed Mar 18, 2020
1 parent 4d97bf3 commit 0293684
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions mini-modeline.el
Original file line number Diff line number Diff line change
Expand Up @@ -310,15 +310,15 @@ BODY will be supplied with orig-func and args."
"Enable `mini-modeline'."
;; Hide modeline for terminal, or use empty modeline for GUI.
(if (display-graphic-p)
(setq-default mode-line-format " ")
(setq-default mode-line-format '(" "))
(setq-default mode-line-format nil))
;; Do the same thing with opening buffers.
(mapc
(lambda (buf)
(unless (string-prefix-p " " (buffer-name buf))
(with-current-buffer buf
(if (display-graphic-p)
(setq mode-line-format " ")
(setq mode-line-format '(" "))
(setq mode-line-format nil))
(if (and (minibufferp buf) mini-modeline-enhance-visual)
(mini-modeline--set-buffer-background)))))
Expand Down

0 comments on commit 0293684

Please sign in to comment.