Add notmuch-emacs configuration.

This commit is contained in:
Gabriel Ebner 2013-04-29 16:09:02 +02:00
parent 5cc4a837aa
commit ebe9cdd4f4
2 changed files with 23 additions and 0 deletions

View File

@ -39,3 +39,5 @@
(cons '("\\.ebuild\\'" . ebuild-mode) (cons '("\\.ebuild\\'" . ebuild-mode)
(cons '("\\.eclass\\'" . ebuild-mode) (cons '("\\.eclass\\'" . ebuild-mode)
auto-mode-alist))) auto-mode-alist)))
(eval-after-load "notmuch" '(load "~/etc/notmuch-config.el"))

21
notmuch-config.el Normal file
View File

@ -0,0 +1,21 @@
(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))