aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJorge A. Alfaro Murillo2014-10-16 22:12:47 +0000
committerKatsumi Yamaoka2014-10-16 22:12:47 +0000
commit60727a5494698b4c6bfa24bab72f75bb7d07a755 (patch)
tree5e5f84ace40d157fdb694674a45d80c78ae8767d
parent417cf674853d76489eedb77ac856e21a087b955c (diff)
downloademacs-60727a5494698b4c6bfa24bab72f75bb7d07a755.tar.gz
emacs-60727a5494698b4c6bfa24bab72f75bb7d07a755.zip
lisp/gnus/message.el (message-insert-signature): Make signature respect format=flowed
-rw-r--r--lisp/gnus/ChangeLog5
-rw-r--r--lisp/gnus/message.el9
2 files changed, 10 insertions, 4 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 7dab8dec90d..00c96b7d963 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,8 @@
12014-10-15 Jorge A. Alfaro-Murillo <jorge.alfaro-murillo@yale.edu> (tiny change)
2
3 * message.el (message-insert-signature): Use `newline' instead of
4 inserting explicit "\n".
5
12014-10-15 Sylvain Chouleur <sylvain.chouleur@gmail.com> 62014-10-15 Sylvain Chouleur <sylvain.chouleur@gmail.com>
2 7
3 * gnus-icalendar.el: Support vcal format timezones 8 * gnus-icalendar.el: Support vcal format timezones
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index 92cab57337c..1cec37e15dc 100644
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -3531,15 +3531,16 @@ Message buffers and is not meant to be called directly."
3531 (goto-char (point-max)) 3531 (goto-char (point-max))
3532 ;; Insert the signature. 3532 ;; Insert the signature.
3533 (unless (bolp) 3533 (unless (bolp)
3534 (insert "\n")) 3534 (newline))
3535 (when message-signature-insert-empty-line 3535 (when message-signature-insert-empty-line
3536 (insert "\n")) 3536 (newline))
3537 (insert "-- \n") 3537 (insert "-- ")
3538 (newline)
3538 (if (eq signature t) 3539 (if (eq signature t)
3539 (insert-file-contents signature-file) 3540 (insert-file-contents signature-file)
3540 (insert signature)) 3541 (insert signature))
3541 (goto-char (point-max)) 3542 (goto-char (point-max))
3542 (or (bolp) (insert "\n"))))) 3543 (or (bolp) (newline)))))
3543 3544
3544(defun message-insert-importance-high () 3545(defun message-insert-importance-high ()
3545 "Insert header to mark message as important." 3546 "Insert header to mark message as important."