diff options
| author | JSDurand <mmemmew@gmail.com> | 2023-01-06 23:34:31 +0800 |
|---|---|---|
| committer | JSDurand <mmemmew@gmail.com> | 2023-01-06 23:34:31 +0800 |
| commit | b947f76e79cffc2bbeda2bbf41605b9ed97d8a0b (patch) | |
| tree | e670e34a1ba17c308887147298e81b55b4ec4824 /gnus-conf.el | |
| parent | 7d0ba00c8897a98b2b27f02f026e1dcc0a2e6de9 (diff) | |
gnus: Modify Protesilaos' related queries
Diffstat (limited to 'gnus-conf.el')
| -rw-r--r-- | gnus-conf.el | 20 |
1 files changed, 17 insertions, 3 deletions
diff --git a/gnus-conf.el b/gnus-conf.el index 3affe4f..6d6a3ce 100644 --- a/gnus-conf.el +++ b/gnus-conf.el @@ -282,8 +282,20 @@ no loss in removing this group from other variables." (list 'interactive) (list 'durand-gnunque query))) -;; Protesilaos' mails -(durand-gnus-save-query "prot" "from:prot* or to:prot*") +;; Protesilaos' non-list mails +(durand-gnus-save-query "prot" + "(from:Protesilaos.*Stavrou.*public@protesilaos* or \ +to:Protesilaos.*Stavrou.*public@protesilaos*) and not \ +from:~protesilaos/.*@lists.sr.ht and not \ +to:~protesilaos/.*@lists.sr.ht") + +;; All Protesilaos' mails +(durand-gnus-save-query "prot-all" "from:prot* or to:prot*") + +;; Mailing lists from Protesilaos +(durand-gnus-save-query "prot-lists" + "from:~protesilaos/.*@lists.sr.ht or \ +to:~protesilaos/.*@lists.sr.ht") ;; From my professors (durand-gnus-save-query "minglung" @@ -298,7 +310,9 @@ or from:u1991123* or to:u1991123*") ;;;; bind in gnus group buffer -(define-key gnus-group-mode-map (vector ?v ?p) #'durand-gnus-view-prot) +(define-key gnus-group-mode-map (vector ?v ?p ?p) #'durand-gnus-view-prot) +(define-key gnus-group-mode-map (vector ?v ?p ?m) #'durand-gnus-view-prot-lists) +(define-key gnus-group-mode-map (vector ?v ?p ?a) #'durand-gnus-view-prot-all) (define-key gnus-group-mode-map (vector ?v ?m) #'durand-gnus-view-minglung) (define-key gnus-group-mode-map (vector ?v ?t) #'durand-gnus-view-tan) (define-key gnus-group-mode-map (vector ?v ?f) #'durand-gnus-view-friends) |