From: Amin Bandali <bandali@gnu.org>
Date: Sat, 24 Dec 2022 21:30:36 +0000 (-0500)
Subject: Show current EXWM workspace index in mode-line
X-Git-Url: https://git.shemshak.org/~bandali/configs/commitdiff_plain/78619ba4c53776ab14ca21a87852926885bbb56d?ds=sidebyside;hp=7c054dcebe12d7121f067b279a772f874b29d3da

Show current EXWM workspace index in mode-line
---

diff --git a/.emacs.d/lisp/bandali-exwm.el b/.emacs.d/lisp/bandali-exwm.el
index b1b0bba..bd28d5b 100644
--- a/.emacs.d/lisp/bandali-exwm.el
+++ b/.emacs.d/lisp/bandali-exwm.el
@@ -309,5 +309,15 @@ around if needed."
 (add-to-list 'load-path (b/lisp "exwm-edit"))
 (require 'exwm-edit)
 
+(with-eval-after-load 'exwm-workspace
+  (setq-default
+   mode-line-format
+   (append
+    mode-line-format
+    '((:eval
+       (format
+        " [%s]" (number-to-string
+                exwm-workspace-current-index)))))))
+
 (provide 'bandali-exwm)
 ;;; bandali-exwm.el ends here