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

mu4e/mu4e-vars.el

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

mu4e/mu4e.el

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

mu4e/org-mu4e.el

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