watch mail queue length

diff --git a/system-status b/system-status
index 460d63be5c33385e03f580d03ecb41e5e9687132..b8e854dbff25b158575aaa99eaadbb21eb734690 100755 (executable)
--- a/system-status
+++ b/system-status
@@ -35,6 +35,10 @@ write-status() {
     chars+=("MAILPING!")
   fi
 
+  qlen=$(/usr/sbin/exim -bpc)
+  if ((qlen)); then
+    chars+=("q $qlen")
+  fi
 
   if ! make -q ~/.local/distro-begin || [[ $(<~/.local/distro-begin) != 0 ]]; then
     chars+=("DISTRO-BEGIN!")