jao-custom-x11

1 files changed, 18 insertions, 1 deletions

diff --git a/init.el b/init.el
index 8660ed9..0ca0161 100644
--- a/init.el
+++ b/init.el
@@ -1656,7 +1656,24 @@
 
 ;;; Graphical window system
 
-(jao-when-linux (require 'jao-custom-window-system))
+(defvar jao-exwm-enabled nil)
+(defun jao-exwm-enabled-p () jao-exwm-enabled)
+
+(defvar jao-xmonad-enabled
+  (jao-when-linux (string= "xmonad" (or (getenv "wm") ""))))
+(defun jao-xmonad-enabled-p () jao-xmonad-enabled)
+
+(defvar jao-wayland-enabled
+  (jao-when-linux (string= "wayland" (or (getenv "XDG_SESSION_TYPE") ""))))
+
+(defvar jao-river-enabled
+  (jao-when-linux (jao-shell-running-p "river")))
+
+(jao-when-darwin
+ (defun jao-wayland-enabled-p () nil)
+ (defun jao-river-enabled-p () nil))
+
+(jao-when-linux (require 'jao-custom-x11))
 
 ;;; Global transients
 (defun jao-list-packages ()