summaryrefslogtreecommitdiffhomepage
path: root/lib
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2021-12-04 21:15:02 +0000
committerjao <jao@gnu.org>2021-12-04 21:15:02 +0000
commitebc832d6e081a0c5f2108c48e11c70d0aea8fc3d (patch)
tree1e4db567b82eaaa8d78a35385b875f99e8adfb05 /lib
parent36787161736b3672c2cd8ae35864b529747b299f (diff)
downloadelibs-ebc832d6e081a0c5f2108c48e11c70d0aea8fc3d.tar.gz
elibs-ebc832d6e081a0c5f2108c48e11c70d0aea8fc3d.tar.bz2
modeline in minibuffer on demand
Diffstat (limited to 'lib')
-rw-r--r--lib/eos/jao-minibuffer.el26
1 files changed, 15 insertions, 11 deletions
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)