+2000-08-24 23:49:23 ShengHuo ZHU <zsh@cs.rochester.edu>
+
+ * message.el (message-send-mail): Narrow-to-headers.
+
2000-08-24 Dave Love <fx@gnu.org>
* gnus-art.el (gnus-insert-mime-button): Fix help-echo for Emacs
;; require one newline at the end.
(or (= (preceding-char) ?\n)
(insert ?\n))
- (when (and news
+ (when
+ (save-restriction
+ (message-narrow-to-headers)
+ (and news
(or (message-fetch-field "cc")
(message-fetch-field "to"))
(string= "text/plain"
(car
(mail-header-parse-content-type
- (message-fetch-field "content-type")))))
+ (message-fetch-field "content-type"))))))
(message-insert-courtesy-copy))
(if (or (not message-send-mail-partially-limit)
(< (point-max) message-send-mail-partially-limit)