summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--rc.org58
1 files changed, 36 insertions, 22 deletions
diff --git a/rc.org b/rc.org
index 1ac68f8..02a9b19 100644
--- a/rc.org
+++ b/rc.org
@@ -2201,18 +2201,13 @@ sieve-filter -eW -o postmaster_address=postmaster@aminb.org \
notmuch tag -new +sent -- from:amin@aminb.org or from:mab@gnu.org or from:aminb@gnu.org or from:abandali@uwaterloo.ca
# initial tagging
-notmuch tag -latest -- tag:latest
+notmuch tag -latest -- tag:latest
notmuch tag +inbox +unread +latest -new -- tag:new
# apply tags to lists
# <aminb>
-notmuch tag -inbox +lists/~sircmpwn/srht-admins -- folder:amin/lists/~sircmpwn/srht-admins
-notmuch tag -inbox +lists/~sircmpwn/srht-announce -- folder:amin/lists/~sircmpwn/srht-announce
-notmuch tag -inbox +lists/~sircmpwn/srht-dev -- folder:amin/lists/~sircmpwn/srht-dev
-notmuch tag -inbox +lists/~sircmpwn/srht-discuss -- folder:amin/lists/~sircmpwn/srht-discuss
-
notmuch tag -inbox +lists/hackernewsletter -- folder:amin/lists/hackernewsletter
notmuch tag -inbox +lists/haskell-weekly -- folder:amin/lists/haskell-weekly
@@ -2232,22 +2227,28 @@ notmuch tag -inbox +lists/watform-students -- folder:uwaterloo/lists/Watform-stu
# </uw>
# <gnu>
-notmuch tag -inbox +lists/emacs-devel -- folder:gnu/l/emacs-devel
-notmuch tag -inbox +lists/emacs-orgmode -- folder:gnu/l/emacs-orgmode
-notmuch tag -inbox +lists/emacsconf-discuss -- folder:gnu/l/emacsconf-discuss
-notmuch tag -inbox +lists/fencepost-users -- folder:gnu/l/fencepost-users
-notmuch tag -inbox +lists/guix-devel -- folder:gnu/l/guix-devel
-notmuch tag -inbox +lists/guile-devel -- folder:gnu/l/guile-devel
-notmuch tag -inbox +lists/help-gnu-emacs -- folder:gnu/l/help-gnu-emacs
-notmuch tag -inbox +lists/info-gnu-emacs -- folder:gnu/l/info-gnu-emacs
-notmuch tag -inbox +lists/www-commits -- folder:gnu/l/www-commits
-notmuch tag -inbox +lists/www-discuss -- folder:gnu/l/www-discuss
-notmuch tag -inbox +webmasters -- folder:gnu/webmasters
-
-notmuch tag -inbox +lists/deepspec -- folder:gnu/l/deepspec
-notmuch tag -inbox +lists/haskell-cafe -- folder:gnu/l/haskell-cafe
-notmuch tag -inbox +lists/haskell-art -- folder:gnu/l/haskell-art
-notmuch tag -inbox +lists/notmuch -- folder:gnu/l/notmuch
+notmuch tag -inbox +l/emacs-devel -- folder:gnu/l/emacs-devel
+notmuch tag -inbox +l/emacs-orgmode -- folder:gnu/l/emacs-orgmode
+notmuch tag -inbox +l/emacsconf-discuss -- folder:gnu/l/emacsconf-discuss
+notmuch tag -inbox +l/fencepost-users -- folder:gnu/l/fencepost-users
+notmuch tag -inbox +l/guix-devel -- folder:gnu/l/guix-devel
+notmuch tag -inbox +l/guile-devel -- folder:gnu/l/guile-devel
+notmuch tag -inbox +l/help-gnu-emacs -- folder:gnu/l/help-gnu-emacs
+notmuch tag -inbox +l/info-gnu-emacs -- folder:gnu/l/info-gnu-emacs
+notmuch tag -inbox +l/www-commits -- folder:gnu/l/www-commits
+notmuch tag -inbox +l/www-discuss -- folder:gnu/l/www-discuss
+notmuch tag -inbox +webmasters -- folder:gnu/webmasters
+
+notmuch tag -inbox +l/deepspec -- folder:gnu/l/deepspec
+notmuch tag -inbox +l/haskell-cafe -- folder:gnu/l/haskell-cafe
+notmuch tag -inbox +l/haskell-art -- folder:gnu/l/haskell-art
+notmuch tag -inbox +l/notmuch -- folder:gnu/l/notmuch
+
+notmuch tag -inbox +l/~aminb/test-priv -- folder:gnu/l/~aminb/test-priv
+notmuch tag -inbox +l/~sircmpwn/sr.ht-admins -- folder:gnu/l/~sircmpwn/sr.ht-admins
+notmuch tag -inbox +l/~sircmpwn/sr.ht-announce -- folder:gnu/l/~sircmpwn/sr.ht-announce
+notmuch tag -inbox +l/~sircmpwn/sr.ht-dev -- folder:gnu/l/~sircmpwn/sr.ht-dev
+notmuch tag -inbox +l/~sircmpwn/sr.ht-discuss -- folder:gnu/l/~sircmpwn/sr.ht-discuss
# </gnu>
notmuch tag -inbox -unread +archive/notmuch -- path:archive/notmuch/**
@@ -2430,6 +2431,19 @@ if anyof (
fileinto :create "l/${listname}";
}
}
+
+if anyof (
+ header :contains "list-id" "<~aminb/test-priv@lists.sr.ht>",
+ header :contains "list-id" "<~sircmpwn/sr.ht-admins@lists.sr.ht>",
+ header :contains "list-id" "<~sircmpwn/sr.ht-announce@lists.sr.ht>",
+ header :contains "list-id" "<~sircmpwn/sr.ht-dev@lists.sr.ht>",
+ header :contains "list-id" "<~sircmpwn/sr.ht-discuss@lists.sr.ht>") {
+ if header :regex "list-id" "(~[a-z_0-9-]+)/([a-z_0-9.-]+)@" {
+ set :lower "username" "${1}";
+ set :lower "listname" "${2}";
+ fileinto :create "l/${username}/${listname}";
+ }
+}
#+end_src
** polybar