diff options
| -rw-r--r-- | init.org | 6 |
1 files changed, 4 insertions, 2 deletions
@@ -484,10 +484,11 @@ *** xmonad #+begin_src emacs-lisp (defvar jao-xmonad-enabled (string= "xmonad" (or (getenv "wm") ""))) + (defun jao-xmonad-enabled-p () jao-xmonad-enabled) (defun jao-xmonad-enable () (setq jao-browse-doc-use-emacs-p t) - (setq jao-wallpaper-random-wake nil) + (setq jao-wallpaper-random-wake t) (jao-set-transparency) (jao-trisect) (message "Welcome to xmonad")) @@ -3255,7 +3256,8 @@ ["Window system" :if window-system ("w" "set wallpaper" jao-set-wallpaper) ("W" "set radom wallpaper" jao-set-random-wallpaper) - ("x" "restart xmobar" jao-xmobar-restart :if window-system)] + ("x" "restart xmobar" jao-xmobar-restart :if jao-exwm-enabled-p) + ("x" "kill xmobar" jao-xmobar-kill :if jao-xmonad-enabled-p)] ["Helpers" ("r" "org reveal" org-reveal) ("k" (lambda () (concat "keyboard" (when (jao-kb-toggled-p) "*"))) |