From 62445df94c0adfed605783200ec5ef3f030d323a Mon Sep 17 00:00:00 2001 From: larstvei Date: Sat, 4 Jan 2014 06:52:36 +0100 Subject: [PATCH] Tweaking the mu4e setup. --- init.el | 27 +++++++++++++++------------ init.org | 29 ++++++++++++++++------------- 2 files changed, 31 insertions(+), 25 deletions(-) diff --git a/init.el b/init.el index 9d5370e..e218db7 100644 --- a/init.el +++ b/init.el @@ -184,21 +184,22 @@ PACKAGE is installed and the current version is deleted." (defvar load-mail-setup nil) (when load-mail-setup - ;; Dependent on both mu4e and smtpmail (for sending only). + ;; We need mu4e (require 'mu4e) - (require 'smtpmail) ;; Some basic mu4e settings. - (setq mu4e-maildir "~/.ifimail" ; top-level Maildir - mu4e-sent-folder "/INBOX.Sent" ; folder for sent messages - mu4e-drafts-folder "/INBOX.Drafts" ; unfinished messages - mu4e-trash-folder "/INBOX.Trash" ; trashed messages - mu4e-refile-folder "/INBOX.Archive" ; saved messages - mu4e-get-mail-command "offlineimap" ; use offlineimap to fetch mail - mu4e-view-show-images t ; view images + (setq mu4e-maildir "~/.ifimail" ; top-level Maildir + mu4e-sent-folder "/INBOX.Sent" ; folder for sent messages + mu4e-drafts-folder "/INBOX.Drafts" ; unfinished messages + mu4e-trash-folder "/INBOX.Trash" ; trashed messages + mu4e-refile-folder "/INBOX.Archive" ; saved messages + mu4e-get-mail-command "offlineimap" ; offlineimap to fetch mail + mu4e-compose-signature "- Lars" ; Sign my name + mu4e-update-interval (* 5 60) ; update every 5 min + mu4e-confirm-quit nil ; just quit + mu4e-view-show-images t ; view images mu4e-html2text-command - "html2text -utf8" ; use utf-8 - mu4e-compose-signature "- Lars" ; Sign my name + "html2text -utf8" ; use utf-8 ) ;; Setup for sending mail. @@ -218,10 +219,12 @@ PACKAGE is installed and the current version is deleted." (when (fboundp 'imagemagick-register-types) (imagemagick-register-types)) - ;; A function to show mu4e and nothing else! + ;; A wrapper function to start (if necessary), fetch mail and delete other + ;; windows. (defun show-mu4e () (interactive) (mu4e) + (mu4e-update-mail-and-index t) (delete-other-windows)) ;; Overwrite the native 'compose-mail' binding to 'show-mu4e'. diff --git a/init.org b/init.org index 6c5e91b..6be93cc 100644 --- a/init.org +++ b/init.org @@ -362,7 +362,7 @@ calendar-location-name "Oslo, Norway") #+END_SRC -** Mail +** COMMENT Mail I use [[http://www.djcbsoftware.nl/code/mu/mu4e.html][mu4e]] (which is a part of [[http://www.djcbsoftware.nl/code/mu/][mu]]) along with [[http://docs.offlineimap.org/en/latest/][offlineimap]] on one of my computers. Because the mail-setup wont work without these programs @@ -373,21 +373,22 @@ (defvar load-mail-setup nil) (when load-mail-setup - ;; Dependent on both mu4e and smtpmail (for sending only). + ;; We need mu4e (require 'mu4e) - (require 'smtpmail) ;; Some basic mu4e settings. - (setq mu4e-maildir "~/.ifimail" ; top-level Maildir - mu4e-sent-folder "/INBOX.Sent" ; folder for sent messages - mu4e-drafts-folder "/INBOX.Drafts" ; unfinished messages - mu4e-trash-folder "/INBOX.Trash" ; trashed messages - mu4e-refile-folder "/INBOX.Archive" ; saved messages - mu4e-get-mail-command "offlineimap" ; use offlineimap to fetch mail - mu4e-view-show-images t ; view images + (setq mu4e-maildir "~/.ifimail" ; top-level Maildir + mu4e-sent-folder "/INBOX.Sent" ; folder for sent messages + mu4e-drafts-folder "/INBOX.Drafts" ; unfinished messages + mu4e-trash-folder "/INBOX.Trash" ; trashed messages + mu4e-refile-folder "/INBOX.Archive" ; saved messages + mu4e-get-mail-command "offlineimap" ; offlineimap to fetch mail + mu4e-compose-signature "- Lars" ; Sign my name + mu4e-update-interval (* 5 60) ; update every 5 min + mu4e-confirm-quit nil ; just quit + mu4e-view-show-images t ; view images mu4e-html2text-command - "html2text -utf8" ; use utf-8 - mu4e-compose-signature "- Lars" ; Sign my name + "html2text -utf8" ; use utf-8 ) ;; Setup for sending mail. @@ -407,10 +408,12 @@ (when (fboundp 'imagemagick-register-types) (imagemagick-register-types)) - ;; A function to show mu4e and nothing else! + ;; A wrapper function to start (if necessary), fetch mail and delete other + ;; windows. (defun show-mu4e () (interactive) (mu4e) + (mu4e-update-mail-and-index t) (delete-other-windows)) ;; Overwrite the native 'compose-mail' binding to 'show-mu4e'.