diff options
| author | jao <jao@gnu.org> | 2022-04-30 02:09:48 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2022-04-30 02:09:48 +0100 |
| commit | 2fa391e20929f2de4535a496d5487231ab4fd27e (patch) | |
| tree | 8b98cd62b9a645ac6c7bbf70ac77e083baf3b582 | |
| parent | b0d45188b5ae4824fcde34566d75f8a3d2365e99 (diff) | |
| download | elibs-2fa391e20929f2de4535a496d5487231ab4fd27e.tar.gz elibs-2fa391e20929f2de4535a496d5487231ab4fd27e.tar.bz2 | |
xmonad: xmobar killable by transient
| -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) "*"))) |