Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
ae01d7ca
Commit
ae01d7ca
authored
Jan 11, 2011
by
Glenn Morris
Browse files
* message.el (message-mail): A compose-mail function should accept headers as strings.
parent
70ba1ec8
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
12 additions
and
3 deletions
+12
-3
lisp/gnus/ChangeLog
lisp/gnus/ChangeLog
+5
-1
lisp/gnus/message.el
lisp/gnus/message.el
+7
-2
No files found.
lisp/gnus/ChangeLog
View file @
ae01d7ca
2011-01-12 Glenn Morris <rgm@gnu.org>
* message.el (message-mail): A compose-mail function should
accept headers as strings.
2010-11-19 Yuri Karaban <tech@askold.net> (tiny change)
* pop3.el (pop3-open-server): Read server greeting before starting TLS
...
...
@@ -13920,4 +13925,3 @@ See ChangeLog.2 for earlier changes.
;; add-log-time-zone-rule: t
;; End:
;;; arch-tag: 3f33a3e7-090d-492b-bedd-02a1417d32b4
lisp/gnus/message.el
View file @
ae01d7ca
...
...
@@ -6493,7 +6493,13 @@ is a function used to switch to and display the mail buffer."
(message-setup
(nconc
`((To . ,(or to "")) (Subject . ,(or subject "")))
(when other-headers other-headers))
;; C-h f compose-mail says that headers should be specified as
;; (string . value); however all the rest of message expects
;; headers to be symbols, not strings (eg message-header-format-alist).
;; http://lists.gnu.org/archive/html/emacs-devel/2011-01/msg00337.html
;; We need to convert any string input, eg from rmail-start-mail.
(dolist (h other-headers other-headers)
(if (stringp (car h)) (setcar h (intern (capitalize (car h)))))))
yank-action send-actions continue switch-function)
;; FIXME: Should return nil if failure.
t))
...
...
@@ -8195,5 +8201,4 @@ Used in `message-simplify-recipients'."
;; coding: iso-8859-1
;; End:
;; arch-tag: 94b32cac-4504-4b6c-8181-030ebf380ee0
;;; message.el ends here
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment