From 71c36b303948353b49944fedcb09589a9128f961 Mon Sep 17 00:00:00 2001 From: noa@gaiwan.org Date: Tue, 2 Jul 2024 11:38:22 +0000 Subject: Update email configuration --- config.org | 22 ++++++++++++++++------ 1 file changed, 16 insertions(+), 6 deletions(-) (limited to 'config.org') diff --git a/config.org b/config.org index ec1054d..5866bda 100644 --- a/config.org +++ b/config.org @@ -1802,26 +1802,36 @@ I have experimented with lots of different methods of reading mail, both in and #+begin_src elisp (setopt rmail-primary-inbox-list - '("mbox://~/data/mail/spool.mbox")) + (directory-files "~/data/mail/inbox" t "^[^\.]")) (setopt rmail-file-name "~/data/mail/rmail.mbox") (setopt rmail-user-mail-address-regexp - (rx "noa@noa.pub")) + (rx "noa@noa.pub")) (setopt rmail-mime-prefer-html nil) (setopt rmail-mime-attachment-dirs-alist '(("" "~/media"))) (setopt rmail-displayed-headers - (rx bol (or "To" "Cc" "From" "Date" "Subject") ":")) - (setopt rmail-secondary-file-directory "~/data/mail/archive.mbox") + (rx bol (or "To" "Cc" "From" "Date" "Subject") ":")) + (setopt rmail-secondary-file-directory "~/data/mail/archive/") (setopt rmail-secondary-file-regexp "\\.mbox\\'") (setopt rmail-delete-after-output t) - (setopt rmail-default-file "~/") + (setopt rmail-default-file "~/data/mail/archive/") (setopt mail-dont-reply-to-names rmail-user-mail-address-regexp) (add-hook 'rmail-show-message-hook #'visual-line-fill-column-mode) - (setopt rmail-display-summary t) + (setopt rmail-display-summary nil) (setopt rmail-redisplay-redisplay-summary t) (setopt rmail-summary-line-count-flag nil) (setopt rmail-summary-window-size 12) + + (defun noa/message-default-headers () + (format "Fcc: ~/data/mail/outbox/%s.mbox" + (format-time-string "%Y-%m"))) + (setopt message-default-headers #'noa/message-default-headers) +#+end_src + +#+begin_src elisp + (setopt mairix-file-path "~/data/mail/mairix/") + (setopt mairix-search-file "search.mbox") #+end_src ** Sending mail with msmtp -- cgit 1.4.1-2-gfad0