summaryrefslogtreecommitdiffhomepage
path: root/custom
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2025-09-25 22:04:35 +0100
committerjao <jao@gnu.org>2025-09-25 22:04:35 +0100
commit4de54b20152f272201b0b8f38f266bb6f5d1a4cd (patch)
tree8518adb9204aab46ff1d740bbcb21f4a9583bb87 /custom
parent09f814c07e1a7b5d97ac63831644e0f439c1aefd (diff)
downloadelibs-4de54b20152f272201b0b8f38f266bb6f5d1a4cd.tar.gz
elibs-4de54b20152f272201b0b8f38f266bb6f5d1a4cd.tar.bz2
gnus: a local mail scan that seems to work
Diffstat (limited to 'custom')
-rw-r--r--custom/jao-custom-gnus.el10
1 files changed, 6 insertions, 4 deletions
diff --git a/custom/jao-custom-gnus.el b/custom/jao-custom-gnus.el
index d53adb7..21f392b 100644
--- a/custom/jao-custom-gnus.el
+++ b/custom/jao-custom-gnus.el
@@ -183,8 +183,9 @@
nnml-directory message-directory)
(defvar jao-local-mail-sources
- (mapcar (lambda (f) `(maildir :path ,(expand-file-name f jao-maildir)))
- '("local/" "feeds/")))
+ (append (mapcar (lambda (f) `(maildir :path ,(expand-file-name f jao-maildir)))
+ '("local/" "feeds/"))
+ (jao-when-darwin '((file :path "/var/mail/jao")))))
(setq mail-sources
(let* ((pwd (auth-source-pick-first-password :host "proton-bridge"))
@@ -618,9 +619,10 @@
(jao-gnus--notify)))
(defun jao-gnus--scan-local-mail ()
- (let ((inhibit-message t))
+ (let ((inhibit-message nil))
+ (message "Scanning local news in demon...")
(let ((mail-sources jao-local-mail-sources))
- (gnus-demon-scan-mail))
+ (gnus-demon-scan-news))
(jao-gnus--notify)))
(defun jao-gnus-add-demon ()