From: Johan Malm <jgm323@gmail.com>
Date: Tue, 14 Jul 2020 20:16:27 +0000 (+0100)
Subject: Add list-themes.sh
X-Git-Url: https://git.mdlowis.com/?a=commitdiff_plain;h=d4bd99888e0d67dd050379ee053917d7956f3605;p=proto%2Flabwc.git

Add list-themes.sh
---

diff --git a/tools/theme/list-themes.sh b/tools/theme/list-themes.sh
new file mode 100755
index 00000000..4f4b46b2
--- /dev/null
+++ b/tools/theme/list-themes.sh
@@ -0,0 +1,19 @@
+#!/bin/sh
+#
+# List available openbox themes
+#
+
+printf '%b\n' "#icons\ttheme name"
+printf '%b\n' "-------------------"
+
+for d in $HOME/.themes/* /usr/share/themes/*; do
+	if [ -d "$d/openbox-3" ]; then
+		icon_count=0
+		for f in $d/openbox-3/*; do
+			case $f in
+				*xbm) : $(( icon_count++ )) ;;
+			esac
+		done
+		printf '%b\n' "$icon_count\t$(basename $d)"
+	fi
+done