diff options
-rw-r--r-- | emacs/init.el | 19 |
1 files changed, 9 insertions, 10 deletions
diff --git a/emacs/init.el b/emacs/init.el index db85235..6e6408f 100644 --- a/emacs/init.el +++ b/emacs/init.el @@ -611,30 +611,29 @@ With prefix argument TIME, also add the current time." ;;; Email ;; I keep coming back to rmail, despite its many, many warts. +;; Currently i fetch mail into Spool.mbox with fdm, then rmail moves it into Inbox.mbox. (use-package rmail + :commands (rmail) :custom - (rmail-primary-inbox-list - (directory-files "~/Documents/Library/Mail/inbox" t "^[^\.]")) - (rmail-file-name "~/Documents/Library/Mail/rmail.mbox") + (rmail-primary-inbox-list '("~/Documents/Library/Mail.new/Spool.mbox")) + (rmail-file-name "~/Documents/Library/Mail.new/Inbox.mbox") (rmail-user-mail-address-regexp (rx "noa@noa.pub")) (rmail-mime-prefer-html nil) (rmail-mime-attachment-dirs-alist '(("" "~/media"))) (rmail-displayed-headers (rx bol (or "To" "Cc" "From" "Date" "Subject") ":")) - (rmail-secondary-file-directory "~/Documents/Library/Mail/archive/") - (rmail-secondary-file-regexp "\\.mbox\\'") (rmail-delete-after-output t) - (rmail-default-file "~/Documents/Library/Mail/archive/") + (rmail-default-file "~/Documents/Library/Mail/Archive.mbox") (mail-dont-reply-to-names rmail-user-mail-address-regexp) (rmail-display-summary nil) - (rmail-redisplay-redisplay-summary t) + (rmail-redisplay-summary t) (rmail-summary-line-count-flag nil) - (rmail-summary-window-size 12) - :hook - ((rmail-show-message . visual-line-fill-column-mode))) + ;; :hook + ;; ((rmail-show-message . visual-line-fill-column-mode)) + ) (use-package message :defer t |