anchor.diff:  encode_part(#mime_part{data=Data} = P, Boundary) ->
       "--" ++ Boundary ++ "\r\n" ++
       encode_headers(part_headers(P)) ++ "\r\n\r\n" ++
  -    z_convert:to_list(Data) ++ "\r\n".
  +    double_dot(z_convert:to_list(Data)) ++ "\r\n".
   
   part_headers(#mime_part{type=undefined, encoding={Enc, MimeType, Charset},
                           name=undefined}) ->
  
positive.code: 	is_mixed([#mime_part{encoding={_, "text/html", _}}|T]) -> is_mixed(T);
  	is_mixed(_) -> true.
  	
  
  invent_mime_boundary() ->
      string:copies("=", 10) ++ list_rand(boundary_chars(), 30).
          
  
negative.code: 
  -export([test_msg/0,
           send_test/4,
           test/0,
           double_dot/1
  ]).
  
  %%====================================================================
  