From 13632db6a55599f613e66d72875ac612f13c8da5 Mon Sep 17 00:00:00 2001
From: Tom Willemse
Date: Thu, 22 Sep 2022 23:00:37 -0700
Subject: [notmuch] Make tasks for some Alwaysdata messages

---
 notmuch/usr/bin/notmuch-collect-tasks | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

(limited to 'notmuch')

diff --git a/notmuch/usr/bin/notmuch-collect-tasks b/notmuch/usr/bin/notmuch-collect-tasks
index 4eff658..0315971 100755
--- a/notmuch/usr/bin/notmuch-collect-tasks
+++ b/notmuch/usr/bin/notmuch-collect-tasks
@@ -6,7 +6,9 @@ exec scsh -e main -s "$0" "$@"
 
 (define message-query
   '(from:fidobill@fidomobile.ca
-    and "subject:Your Fido bill is ready"))
+    and "subject:Your Fido bill is ready"
+    or "subject:[alwaysdata] Negative balance to settle"
+    or "subject:[alwaysdata] Automatic renewal of domains impossible"))
 
 (define processed-tag-name "processed")
 
@@ -28,7 +30,7 @@ exec scsh -e main -s "$0" "$@"
   (let ((output-file (cadr args))
         (messages (run/sexp
                    (notmuch search --format=sexp
-                            ,@message-query
+                            "(" ,@message-query ")"
                             and not ,(format #f "tag:~a" processed-tag-name)))))
     (with-current-output-port
      (open-output-file output-file (file-options create append))
-- 
cgit v1.2.3-54-g00ecf