diff options
| author | Amin Bandali <bandali@gnu.org> | 2022-12-24 16:30:36 -0500 |
|---|---|---|
| committer | Amin Bandali <bandali@gnu.org> | 2022-12-24 16:30:36 -0500 |
| commit | 78619ba4c53776ab14ca21a87852926885bbb56d (patch) | |
| tree | a113712d0eab9d2cf167471ee3a21a0158ca6722 | |
| parent | 7c054dcebe12d7121f067b279a772f874b29d3da (diff) | |
| download | configs-78619ba4c53776ab14ca21a87852926885bbb56d.tar.gz configs-78619ba4c53776ab14ca21a87852926885bbb56d.tar.xz configs-78619ba4c53776ab14ca21a87852926885bbb56d.zip | |
Show current EXWM workspace index in mode-line
| -rw-r--r-- | .emacs.d/lisp/bandali-exwm.el | 10 |
1 files changed, 10 insertions, 0 deletions
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 |