From 0516604a56af2c148bc36d5fbfa6b45c43542afe Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Fri, 28 Jan 2022 18:57:37 +0000
Subject: trayer fixes

---
 bin/xmobars.sh | 6 +++---
 src/TopC.hs    | 2 +-
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/bin/xmobars.sh b/bin/xmobars.sh
index a11a6c0..c49896f 100755
--- a/bin/xmobars.sh
+++ b/bin/xmobars.sh
@@ -2,13 +2,13 @@
 
 killall trayer
 
-trayer --margin 2 --distancefrom left \
+trayer -l --margin 2 --distancefrom left \
        --distance 1 --edge top \
        --align left --SetDockType true --SetPartialStrut false \
        --widthtype request \
        --height 21 --heighttype pixel \
-       --transparent false \
-       --alpha 255 --padding 1 &
+       --transparent true \
+       --alpha 0 --padding 1 &
 
 killall xmobar-exwm
 xmobar-exwm &
diff --git a/src/TopC.hs b/src/TopC.hs
index a85bb8c..c447270 100644
--- a/src/TopC.hs
+++ b/src/TopC.hs
@@ -35,6 +35,7 @@ config p = (baseConfig p) {
                , Run (iconBatt p)
                , Run mpdMon
                , Run (NamedXPropertyLog "_EMACS_LOG" "elog")
+               , Run (NamedXPropertyLog "_XMONAD_TRAYPAD" "tray")
                , if pIsLight p then Run (cpu p) else  Run (cpuBars p)
                , Run memoratio
                , Run (diskU p)
@@ -51,7 +52,6 @@ config p = (baseConfig p) {
                , Run laTime
                , Run localTime
                , Run w -- LEGE, LEBL, KCV0
-               , Run trayPadding
                ]
   , template = "|tray| "
              ++ "|batt0| "
-- 
cgit v1.2.3