Merge branch 'master' of github.com:djcb/mu

This commit is contained in:
djcb
2012-08-23 00:01:04 +03:00
3 changed files with 11 additions and 4 deletions

View File

@ -128,6 +128,11 @@ see `mu4e-headers-visible-lines' and
view buffer." view buffer."
:group 'mu4e-view) :group 'mu4e-view)
(defcustom mu4e-confirm-quit t
"Whether to confirm to quit mu4e."
:type 'boolean
:group 'mu4e)
;; crypto ;; crypto
(defgroup mu4e-crypto nil (defgroup mu4e-crypto nil
"Crypto-related settings." "Crypto-related settings."

View File

@ -82,8 +82,10 @@
(defun mu4e-quit() (defun mu4e-quit()
"Quit the mu4e session." "Quit the mu4e session."
(interactive) (interactive)
(when (y-or-n-p (mu4e-format "Are you sure you want to quit?")) (if mu4e-confirm-quit
(mu4e~stop))) (when (y-or-n-p (mu4e-format "Are you sure you want to quit?"))
(mu4e~stop))
(mu4e~stop)))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

View File

@ -65,7 +65,7 @@
desc link) desc link)
(org-store-link-props :type "mu4e" :query query) (org-store-link-props :type "mu4e" :query query)
(setq (setq
desc (org-make-link "mu4e:query:" query) desc (concat "mu4e:query:" query)
link desc) link desc)
(org-add-link-props :link link :description desc) (org-add-link-props :link link :description desc)
link)) link))
@ -76,7 +76,7 @@
link) link)
(org-store-link-props :type "mu4e" :link link (org-store-link-props :type "mu4e" :link link
:message-id msgid) :message-id msgid)
(setq link (org-make-link "mu4e:msgid:" msgid)) (setq link (concat "mu4e:msgid:" msgid))
(org-add-link-props :link link (org-add-link-props :link link
:description (funcall org-mu4e-link-desc-func msg)) :description (funcall org-mu4e-link-desc-func msg))
link)))) link))))