From 9c490d02512b86c95aa9020d000daba947415a74 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Sat, 15 May 2021 00:28:19 +0100
Subject: tweaks for in-buffer mode-line

---
 init.org | 16 +++++++++++++---
 1 file changed, 13 insertions(+), 3 deletions(-)

(limited to 'init.org')

diff --git a/init.org b/init.org
index 827da3e..b95a59e 100644
--- a/init.org
+++ b/init.org
@@ -270,6 +270,10 @@
                     "%L %r %B (%p%% load, remaining time %t)"
                     battery-mode-line-format " %b%p "))
       (display-battery-mode 1)
+      (setq global-mode-string
+            (delq 'battery-mode-line-string global-mode-string))
+      (with-eval-after-load "jao-minibuffer"
+        (jao-minibuffer-add-variable 'battery-mode-line-string 80))
     #+end_src
 * Crypto
 *** PGP, EPG, passwords
@@ -479,8 +483,9 @@
         (jao-load-org "exwm.org")
         (setq jao-exwm-enabled-p t)
         (display-time-mode -1)
-        (jao-minibuffer-add-mode-line 90)
         (jao-ednc-setup 95)
+        ;; (jao-minibuffer-add-mode-line 90)
+        (jao-toggle-inactive-mode-line t)
         (exwm-enable)
         (jao-trisect t)
         (jao-exwm-xmobar)
@@ -650,9 +655,14 @@
 *** Mode line format
     #+begin_src emacs-lisp
       (setq line-number-display-limit-width 250)
-      (setq mode-line-position-column-format '(",%c")
+      (setq mode-line-position-column-format '(" %c")
             mode-line-position-line-format '(" %l,%c"))
-      (line-number-mode 1)
+      (setq mode-line-percent-position
+            '(" %l"
+              (circe-chat-target (:eval (format " [%d]"
+                                                (length (circe-channel-nicks)))))
+              (:eval (format "/%d" (line-number-at-pos (point-max))))))
+      (line-number-mode -1)
       (column-number-mode 1)
     #+end_src
 *** Mode line time
-- 
cgit v1.2.3