Use a blank text as the insertion string to avoid making the From headers syntactical...

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 51c35bd..2fdab57 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2010-11-06  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
 2010-11-06  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 

+       * gnus-ems.el (gnus-put-image): Use a blank text as the insertion
+       string to avoid making the From headers syntactically invalid.
+

        * message.el (message-send-mail): Don't insert courtesy messages if the
        message already has List-Post and List-ID messages.
 
        * message.el (message-send-mail): Don't insert courtesy messages if the
        message already has List-Post and List-ID messages.
 

diff --git a/lisp/gnus-ems.el b/lisp/gnus-ems.el
index 3a79e67..d7d9076 100644 (file)
--- a/lisp/gnus-ems.el
+++ b/lisp/gnus-ems.el
@@ -181,7 +181,7 @@
 
 (defun gnus-put-image (glyph &optional string category)
   (let ((point (point)))
 
 (defun gnus-put-image (glyph &optional string category)
   (let ((point (point)))

-    (insert-image glyph (or string "*"))
+    (insert-image glyph (or string " "))

     (put-text-property point (point) 'gnus-image-category category)
     (unless string
       (put-text-property (1- (point)) (point)
     (put-text-property point (point) 'gnus-image-category category)
     (unless string
       (put-text-property (1- (point)) (point)