From 78619ba4c53776ab14ca21a87852926885bbb56d Mon Sep 17 00:00:00 2001
From: Amin Bandali <bandali@gnu.org>
Date: Sat, 24 Dec 2022 16:30:36 -0500
Subject: Show current EXWM workspace index in mode-line

---
 .emacs.d/lisp/bandali-exwm.el | 10 ++++++++++
 1 file changed, 10 insertions(+)

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
-- 
cgit v1.2.3-60-g2f50