summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
-rw-r--r--gnus.org23
-rw-r--r--lib/net/jao-maildir.el2
2 files changed, 15 insertions, 10 deletions
diff --git a/gnus.org b/gnus.org
index 9332301..cee1685 100644
--- a/gnus.org
+++ b/gnus.org
@@ -1,5 +1,6 @@
#+title: Gnus
#+PROPERTY: header-args :tangle yes :comments yes :results silent
+#+auto_tangle: t
* Feature switching vars
#+BEGIN_SRC emacs-lisp
@@ -264,6 +265,8 @@
`(("^nnimap:jao/.*"
(jao-gnus--trash-group "nnimap:jao/trash")
(jao-gnus--spam-group "nnimap:jao/spam")
+ (jao-gnus--archiving-group "nnimap:jao/archive"))
+ ("^nnimap:jao/archive$"
(jao-gnus--archiving-group "nnimap:trove/jao"))
("^nnimap:pm/.*"
(jao-gnus--trash-group "nnimap:pm/trash")
@@ -277,8 +280,11 @@
(jao-gnus--trash-group nil)
(expiry-target . delete))
("^nnimap:jao/inbox"
- (gcc-self . t)
- (posting-style (gcc "nnimap:trove/jao")))
+ (gcc-self . t))
+ ("^nnimap:b\\(ig\\)?ml/.*"
+ (posting-style (address "jao@bigml.com"))
+ (jao-gnus--spam-group "nnimap:bigml/spam")
+ (jao-gnus--archiving-group "nnimap:bigml/trove"))
("^nnimap:b\\(ig\\)?ml/inbox"
(gcc-self . t)
(auto-expire . t)
@@ -286,13 +292,6 @@
(expiry-wait . 7.0)
(jao-gnus--trash-group "nnimap:trash")
(expiry-target . "nnimap:bigml/trove"))
- ("^nnimap:bml/inbox"
- (jao-gnus--trash-group "nnimap:bml/trash")
- (expiry-target . "nnimap:bml/trove"))
- ("^nnimap:b\\(ig\\)?ml/.*"
- (posting-style (address "jao@bigml.com"))
- (jao-gnus--spam-group "nnimap:bigml/spam")
- (jao-gnus--archiving-group "nnimap:bigml/trove"))
("^nnimap:b\\(ig\\)?ml/support"
(posting-style (address "support@bigml.com")))
(,jao-gnus-expirable
@@ -314,6 +313,12 @@
(posting-style (address "jao@gnu.org")))
("^nnimap:feeds/\\(physics\\|math\\|papers\\)$"
(jao-gnus--archiving-group "nnimap:trove/sci"))
+ ("^nnimap:jao/hacking$"
+ (jao-gnus--archiving-group "nnimap:trove/tech"))
+ ("^nnimap:jao/gnu$"
+ (jao-gnus--archiving-group "nnimap:trove/gnu"))
+ ("^nnimap:jao/bills$"
+ (jao-gnus--archiving-group "nnimap:trove/bills"))
("\\(gmane\\|gwene\\)\\..*"
(jao-gnus--archiving-group "nnimap:trove/tech")
(posting-style (address "jao@gnu.org")))))
diff --git a/lib/net/jao-maildir.el b/lib/net/jao-maildir.el
index 76a9f9e..d68fbe0 100644
--- a/lib/net/jao-maildir.el
+++ b/lib/net/jao-maildir.el
@@ -135,7 +135,7 @@
(setq jao-maildir--watches
(mapcar (lambda (mbox)
(file-notify-add-watch (jao-maildir--maildir-new mbox)
- '(change attribute-change)
+ '(change)
(jao-maildir--watcher mbox cb)))
jao-maildir--maildirs)))