summaryrefslogtreecommitdiffhomepage
path: root/custom/jao-custom-gnus.el
diff options
context:
space:
mode:
Diffstat (limited to 'custom/jao-custom-gnus.el')
-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 ()