xmobar is not only for exwm

1 files changed, 17 insertions, 4 deletions

diff --git a/init.org b/init.org
index 5df0db5..af773e8 100644
--- a/init.org
+++ b/init.org
@@ -634,6 +634,18 @@
             select-enable-primary t
             selection-timeout 100)
     #+END_SRC
+*** xmobar
+    #+begin_src emacs-lisp
+      (defun jao-xmobar-kill ()
+        (interactive)
+        (shell-command "killall xmobar-exwm"))
+
+      (defun jao-xmobar-restart ()
+        (interactive)
+        (jao-xmobar-kill)
+        (start-process "" nil "xmobar-exwm" "-d"))
+
+    #+end_src
 * Mode line and minibuffer
 *** Time display
     #+begin_src emacs-lisp
@@ -3115,19 +3127,20 @@
        ["Monitors"
         ("p" "htop" jao-term-htop)
         ("v" "vpn status" jao-mullvad-status)
-        ("T" "telegram rooster" telega)
         ("N" "network interfaces" enwc)]
        ["Network"
         ("S" "ssh" jao-ssh)
         ("b" "bluetooth" bluetooth-list-devices)
-        ("c" "connect chats" jao-all-chats)]
+        ("c" "connect chats" jao-all-chats)
+        ("T" "telegram rooster" telega)]
        ["Chats"
         ("t" "telegram" jao-chats-telega)
         ("s" "slack" jao-chats-slack)
         ("i"  "irc" jao-chats-irc)]
-       ["Windows" :if window-system
+       ["Window system" :if window-system
         ("w" "set wallpaper" jao-set-wallpaper)
-        ("W" "set radom wallpaper" jao-set-random-wallpaper)]
+        ("W" "set radom wallpaper" jao-set-random-wallpaper)
+        ("x" "restart xmobar" jao-xmobar-restart :if window-system)]
        ["Helpers"
         ("r" "org reveal" org-reveal)
         ("k" (lambda () (concat "keyboard" (when (jao-kb-toggled-p) "*")))