From d936182a7578412bf4220d311192b07eff1eb872 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Sun, 23 Jan 2022 01:02:20 +0000
Subject: using <hspace> rather than an icon for trayer

---
 bin/padding-width.sh | 6 ++++++
 src/lib/Monitors.hs  | 2 +-
 2 files changed, 7 insertions(+), 1 deletion(-)
 create mode 100755 bin/padding-width.sh

diff --git a/bin/padding-width.sh b/bin/padding-width.sh
new file mode 100755
index 0000000..b339391
--- /dev/null
+++ b/bin/padding-width.sh
@@ -0,0 +1,6 @@
+#!/bin/bash
+
+pname=${1:-panel}
+width=$(xprop -name $pname | grep 'program specified minimum size' | cut -d ' ' -f 5)
+
+echo "<hspace=${width:-0}/>"
diff --git a/src/lib/Monitors.hs b/src/lib/Monitors.hs
index 7d8ef7e..e61847a 100644
--- a/src/lib/Monitors.hs
+++ b/src/lib/Monitors.hs
@@ -235,4 +235,4 @@ tun0 = vpnMark "tun0"
 laTime = DateZone "%H" "en_US" "US/Pacific" "laTime" 10
 localTime = Date "%a %d %R" "datetime" 10
 
-trayPadding = Com "padding-icon.sh" [] "tray" 20
+trayPadding = Com "padding-width.sh" [] "tray" 20
-- 
cgit v1.2.3