Mailbox new messages printer

[dotfiles.git] / bin / bin / inc

diff --git a/bin/bin/inc b/bin/bin/inc
new file mode 100755 (executable)
index 0000000..90d6a64
--- /dev/null
+++ b/bin/bin/inc
@@ -0,0 +1,10 @@
+#!/usr/bin/env zsh
+
+res=()
+cd $MAILDIR
+for mbox (*(/)) {
+    [[ -e $mbox/.inc ]] || continue
+    news=($mbox/new/*(N))
+    [[ ${#news} != 0 ]] && res=($res $mbox:${#news})
+}
+print $res