anchor.diff:  %% @end
   %%-------------------------------------------------------------------------
   headers(HeaderText) ->
  -	{ok,H,_Lines} = regexp:gsub(HeaderText,";\n",";"),
  -	Tokens = string:tokens(H,[10]),
  +	{ok,H,_Lines} = regexp:gsub(HeaderText,"\r\n[\t ]"," "),
  +	Tokens = string:tokens(H,[13,10]),
   	headers(Tokens,[]).
   %%-------------------------------------------------------------------------
   %% @spec (list(),Acc::list()) -> list()
  
positive.code: 
  %%-------------------------------------------------------------------------
  %% @spec (Part::string()) -> mime() | {error,Reason::atom()}
  %% @doc Splits the part at the lcoation of two LF (\n) in a row and 
  %%      returns a #mime{} record. Performs some cleanup as well. 
  %% @end
  %%-------------------------------------------------------------------------
  split(Part) ->
  	Pos = string:str(Part,"\n\n"),
  	{Header,Body} = lists:split(Pos+1,Part),
  	#mime{header_text=string:strip(Header,right,10), body_text = Body}.
  
  
  
  
negative.code: 
  -export([encode/1,decode/1]).
  
  -export([split/1,headers/1,split_multipart/2]).
  
  
  
  