From 2c0a70ee048b9a8d29e40166923d1d397a5ca599 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?=C5=81ukasz=20Pankowski?= <lukpank@o2.pl>
Date: Fri, 11 Nov 2022 18:29:05 +0100
Subject: [PATCH] use compositor and stumpwm if available

---
 xsession/.xsession | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/xsession/.xsession b/xsession/.xsession
index 6255fac..f6f3e33 100755
--- a/xsession/.xsession
+++ b/xsession/.xsession
@@ -14,7 +14,7 @@ xmodmap ~/.xmodmaprc
 if [ -x  ~/.fehbg ]; then
     ~/.fehbg &
 else
-    xsetroot -solid '#4a4a4a'
+    hsetroot -solid '#4a4a4a'
 fi
 
 # lock screen on suspend/hibernate
@@ -31,6 +31,13 @@ xsettingsd &
 
 xsetroot -cursor_name left_ptr
 
+picom -b -I 1 -O 1 -i 1 -e 1 --no-fading-openclose || compton -b --no-fading-openclose
+
+if which xmonad > /dev/null && test -f ~/.stumpwm.d/init.lisp; then
+   export SBCL_HOME="$(dirname $(dirname $(readlink -f $(which sbcl))))/lib/sbcl/"
+   exec stumpwm
+fi
+
 if which xmonad > /dev/null && test -f ~/.config/xmonad/xmonad.hs; then
     exec xmonad
 fi