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

* mu4e-compose: s/refererences/references/

Browse Source
This commit is contained in:
djcb
2012-06-21 21:19:29 +03:00
parent 8fe5201e8e
commit 5c0f82af38
1 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
emacs/mu4e-compose.el
View File

@ -134,7 +134,7 @@ return nil."
(when val (format "%s: %s\n" hdr val))) (when val (format "%s: %s\n" hdr val)))
(defun mu4e~compose-refererences-construct (msg) (defun mu4e~compose-references-construct (msg)
"Construct the value of the References: header based on MSG as a "Construct the value of the References: header based on MSG as a
comma-separated string. Normally, this the concatenation of the comma-separated string. Normally, this the concatenation of the
existing References (which may be empty) and the message-id. If the existing References (which may be empty) and the message-id. If the
@ -330,7 +330,7 @@ You can append flags."
reply-all)) reply-all))
(mu4e~compose-header "Subject" subject) (mu4e~compose-header "Subject" subject)
(mu4e~compose-header "References" (mu4e~compose-header "References"
(mu4e~compose-refererences-construct origmsg)) (mu4e~compose-references-construct origmsg))
(mu4e~compose-common-construct) (mu4e~compose-common-construct)
(when old-msgid (when old-msgid
(mu4e~compose-header "In-reply-to" (format "<%s>" old-msgid))) (mu4e~compose-header "In-reply-to" (format "<%s>" old-msgid)))
@ -350,7 +350,7 @@ You can append flags."
(mu4e~compose-header "To" "") (mu4e~compose-header "To" "")
(mu4e~compose-common-construct) (mu4e~compose-common-construct)
(mu4e~compose-header "References" (mu4e~compose-header "References"
(mu4e~compose-refererences-construct origmsg)) (mu4e~compose-references-construct origmsg))
(mu4e~compose-header "Subject" (mu4e~compose-header "Subject"
(concat (concat
;; if there's no Fwd: yet, prepend it ;; if there's no Fwd: yet, prepend it