summaryrefslogtreecommitdiffhomepage
path: root/gnus.org
diff options
context:
space:
mode:
Diffstat (limited to 'gnus.org')
-rw-r--r--gnus.org9
1 files changed, 5 insertions, 4 deletions
diff --git a/gnus.org b/gnus.org
index eab7ab2..36ec6ff 100644
--- a/gnus.org
+++ b/gnus.org
@@ -126,7 +126,7 @@
(add-to-list 'gnus-search-expandable-keys "list")
(cl-defmethod gnus-search-transform-expression ((engine gnus-search-notmuch)
- (expr (head list)))
+ (expr (head list)))
(format "List:%s" (gnus-search-transform-expression engine (cdr expr)))))
(defun jao-gnus--notmuch-engine (prefix config)
@@ -173,8 +173,9 @@
(setq mail-sources
(when jao-gnus-use-nnml
(cons '(file :path "/var/mail/jao")
- (mapcar (lambda (d) `(maildir :path ,(concat d "/")))
- (directory-files "~/var/mail" t "[^\\.]"))))
+ (when (eq jao-afio-mail-function 'gnus)
+ (mapcar (lambda (d) `(maildir :path ,(concat d "/")))
+ (directory-files "~/var/mail" t "[^\\.]")))))
gnus-message-archive-group nil
nnml-get-new-mail t
nnml-directory message-directory)
@@ -182,7 +183,7 @@
(when jao-gnus-use-nnml
(add-to-list
'gnus-secondary-select-methods
- `(nnml "" ,(jao-gnus--notmuch-engine nnml-directory
+ `(nnml "" ,(jao-gnus--notmuch-engine "~/var/mail/gnus/"
"notmuch.config"))))
(defvar jao-gnus-nnml-group-params