diff options
| -rw-r--r-- | git-email.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/git-email.el b/git-email.el index d561b88..f587070 100644 --- a/git-email.el +++ b/git-email.el @@ -47,7 +47,7 @@ "Work with git and email." :group 'convenience) -(defcustom git-email-compose-message-function 'message-mail +(defcustom git-email-compose-email-function 'message-mail "The function used to compose patch mail." :group 'git-email :type 'symbol) @@ -203,7 +203,7 @@ them into the message buffer." "to" (substring sendemail-to 13 -1))) ; Remove newline (diff (git-email--extract-diff patch-file))) - (funcall git-email-compose-message-function to (cadr (assoc "subject" used-headers)) + (funcall git-email-compose-email-function to (cadr (assoc "subject" used-headers)) used-headers) ;; (let ((body (or (re-search-forward "<#part .*>") ;; (re-search-forward "--text follows this line--")))) |