From 12e7a0f3de4f4f1b1f8e56e7cbe2e972027e0a42 Mon Sep 17 00:00:00 2001
From: Ian Kelling <ian@iankelling.org>
Date: Wed, 16 Oct 2019 17:28:04 -0400
Subject: [PATCH] watch mail queue length

---
 system-status | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/system-status b/system-status
index 460d63b..b8e854d 100755
--- 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!")
-- 
2.30.2