From ebc832d6e081a0c5f2108c48e11c70d0aea8fc3d Mon Sep 17 00:00:00 2001 From: jao Date: Sat, 4 Dec 2021 21:15:02 +0000 Subject: modeline in minibuffer on demand --- lib/eos/jao-minibuffer.el | 26 +++++++++++++++----------- 1 file changed, 15 insertions(+), 11 deletions(-) (limited to 'lib') diff --git a/lib/eos/jao-minibuffer.el b/lib/eos/jao-minibuffer.el index a6420c7..7dcdaf3 100644 --- a/lib/eos/jao-minibuffer.el +++ b/lib/eos/jao-minibuffer.el @@ -125,23 +125,27 @@ The padding pushes TEXT to the right edge of the mode-line." (:eval (format "%d" (line-number-at-pos (point-max))))))) (defvar jao-minibuffer--mode-line-format - `("%[" - (:eval (cond ((derived-mode-p 'gnus-group-mode - 'gnus-article-mode - 'gnus-summary-mode) - mode-line-buffer-identification) - ((derived-mode-p 'circe-channel-mode) - (format "%s [%d]" (buffer-name) (length (circe-channel-nicks)))) - (jao-notmuch--tree-buffer (buffer-name jao-notmuch--tree-buffer)) - ((not (null eww-data)) (plist-get eww-data :title)) - (t "%b"))) + `("· %[" + (:propertize + (:eval (cond ((derived-mode-p 'gnus-group-mode + 'gnus-article-mode + 'gnus-summary-mode) + mode-line-buffer-identification) + ((derived-mode-p 'circe-channel-mode) + (format "%s [%d]" (buffer-name) (length (circe-channel-nicks)))) + (jao-notmuch--tree-buffer (buffer-name jao-notmuch--tree-buffer)) + ((not (null eww-data)) (plist-get eww-data :title)) + (t "%b"))) + face jao-themes-f00 ;; (:family "Iosevka Term") + ) "%]" (:propertize " %*%+ " face jao-themes-warning) (:propertize mode-name face jao-themes-f00) (:propertize ("" minor-mode-alist (vc-mode vc-mode)) face jao-themes-f11) (:propertize mode-line-position face jao-themes-f12) " " - global-mode-string)) + global-mode-string + "·")) (defvar jao-minibuffer--original-modeline nil) -- cgit v1.2.3