diff options
| author | jao <jao@gnu.org> | 2025-09-25 22:04:35 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2025-09-25 22:04:35 +0100 |
| commit | 4de54b20152f272201b0b8f38f266bb6f5d1a4cd (patch) | |
| tree | 8518adb9204aab46ff1d740bbcb21f4a9583bb87 | |
| parent | 09f814c07e1a7b5d97ac63831644e0f439c1aefd (diff) | |
| download | elibs-4de54b20152f272201b0b8f38f266bb6f5d1a4cd.tar.gz elibs-4de54b20152f272201b0b8f38f266bb6f5d1a4cd.tar.bz2 | |
gnus: a local mail scan that seems to work
| -rw-r--r-- | custom/jao-custom-gnus.el | 10 |
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 () |