Added variable mu4e-confirm-quit.

This commit is contained in:
Thomas Wallrafen 2012-08-22 17:22:31 +02:00
parent d93c0bb3e2
commit ef6bcc90e6
2 changed files with 9 additions and 2 deletions

View File

@ -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."

View File

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