alx/mu4e
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Merge pull request #445 from thierryvolpiatto/master

Browse Source 
* mu4e: kill composition buffer when quitting from reply prompt
This commit is contained in:
Dirk-Jan C. Binnema
2014-06-27 14:21:52 +03:00
parent bbfb81d73e 6319a5d53d
commit 6d84ee323b
1 changed files with 5 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
mu4e/mu4e-compose.el
View File

@ -326,7 +326,7 @@ appear on disk."
mu4e~compose-buffer-max-name-length mu4e~compose-buffer-max-name-length
nil nil t))))) nil nil t)))))
(defun mu4e~compose-handler (compose-type &optional original-msg includes) (defun* mu4e~compose-handler (compose-type &optional original-msg includes)
"Create a new draft message, or open an existing one. "Create a new draft message, or open an existing one.
COMPOSE-TYPE determines the kind of message to compose and is a COMPOSE-TYPE determines the kind of message to compose and is a
@ -352,7 +352,10 @@ tempfile)."
(run-hooks 'mu4e-compose-pre-hook) (run-hooks 'mu4e-compose-pre-hook)
;; this opens (or re-opens) a messages with all the basic headers set. ;; this opens (or re-opens) a messages with all the basic headers set.
(mu4e-draft-open compose-type original-msg) (condition-case nil
(mu4e-draft-open compose-type original-msg)
(quit (kill-buffer) (message "[mu4e] Operation aborted")
(return-from mu4e~compose-handler)))
;; insert mail-header-separator, which is needed by message mode to separate ;; insert mail-header-separator, which is needed by message mode to separate
;; headers and body. will be removed before saving to disk ;; headers and body. will be removed before saving to disk
(mu4e~draft-insert-mail-header-separator) (mu4e~draft-insert-mail-header-separator)