[polybar] Show how many items there are in my GTD inbox

polybar/.config/polybar/config

@@ -36,7 +36,7 @@ font-2 = siji:pixelsize=10;1
 
 modules-left = ewmh xwindow
 modules-center =
-modules-right = email pulseaudio xkeyboard vpn date
+modules-right = todo email pulseaudio xkeyboard vpn date
 
 tray-position = center
 tray-padding = 0
@@ -228,3 +228,9 @@ type = custom/script
 exec = count-emails
 interval = 5
 format-prefix = " "
+
+[module/todo]
+type = custom/script
+exec = inbox-size
+interval = 60
+format-prefix = " "

polybar/usr/bin/inbox-size

@@ -0,0 +1,6 @@
+#!/usr/bin/env -S scsh -s
+;; # -*- mode: scheme; -*-
+!#
+
+(display (run (emacs --quick --batch --visit ~/documents/gtd/inbox.org
+                     --eval "(princ (how-many \"^\\\\* +\"))")))