diff options
| author |  Tom Willemse | 2022-09-22 23:00:37 -0700 |
|---|---|---|
| committer | Tom Willemse | 2022-09-22 23:52:35 -0700 |
| commit | c0399a2bbd499d3fcdf2cfce2d9a8162d5865de0 (patch) | |
| tree | 01fda7e10a7e1a745e03893d9dee7f4e48c0ed1a | |
| parent | e21107688347a89877957905c09f3b15535639a0 (diff) | |
| download | notmuch-collect-tasks-c0399a2bbd499d3fcdf2cfce2d9a8162d5865de0.tar.gz notmuch-collect-tasks-c0399a2bbd499d3fcdf2cfce2d9a8162d5865de0.zip | |
Make tasks for some Alwaysdata messages
| -rwxr-xr-x | notmuch-collect-tasks | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/notmuch-collect-tasks b/notmuch-collect-tasks index 4eff658..0315971 100755 --- a/notmuch-collect-tasks +++ b/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)) |