22 lines
789 B
EmacsLisp
22 lines
789 B
EmacsLisp
(custom-set-variables
|
|
'(mm-text-html-renderer 'w3m)
|
|
'(send-mail-function 'sendmail-send-it)
|
|
'(sendmail-program "sendmail")
|
|
'(message-kill-buffer-on-exit t))
|
|
|
|
; swap r and R
|
|
(define-key notmuch-show-mode-map "r" 'notmuch-show-reply)
|
|
(define-key notmuch-show-mode-map "R" 'notmuch-show-reply-sender)
|
|
(define-key notmuch-search-mode-map "r" 'notmuch-search-reply-to-thread)
|
|
(define-key notmuch-search-mode-map "R" 'notmuch-search-reply-to-thread-sender)
|
|
|
|
(custom-set-variables '(notmuch-fcc-dirs nil))
|
|
(add-hook 'message-header-setup-hook 'notmuch-bcc-header-setup)
|
|
(defun notmuch-bcc-header-setup ()
|
|
(message-add-header "Bcc: gebner@gebner.org"))
|
|
|
|
(custom-set-variables
|
|
'(mail-specify-envelope-from t)
|
|
'(message-sendmail-envelope-from 'header)
|
|
'(mail-envelope-from 'header))
|