* mu4e-compose.el: remove some debug crap

This commit is contained in:
djcb
2012-06-16 08:38:00 +03:00
parent 2596c53a5e
commit 3cb1a5e073

View File

@ -111,7 +111,6 @@ such all its settings apply."
(pop-mark)
(buffer-string))))
(defun mu4e~compose-header (hdr val)
"Return a header line of the form HDR: VAL\n. If VAL is nil,
return nil."
@ -163,7 +162,6 @@ e-mail addresses. If LST is nil, returns nil."
the original message ORIGMSG. If the Reply-To address is set, use
that, otherwise use the From address. Note, whatever was in the To:
field before, goes to the Cc:-list (if we're doing a reply-to-all)."
(message "REPLY TO %S" (plist-get origmsg :reply-to))
(let ((reply-to
(or (plist-get origmsg :reply-to) (plist-get origmsg :from))))
(delete-duplicates reply-to :test #'mu4e~compose-address-cell-equal)))