anchor.diff:      end ++
   	[{td, [nowrap,{width,"2%"},{valign,middle},{align,left}],
   	  [{a, [{class,nolink}, {href,Url}],
  -	    {font, [{size,2},{color,"#000000"},{title,Cmd}],
  -	     {pre_html,Cmd}}}]} |
  +	    {font, [{size,2},{color,"#000000"},{title,Cmd}],Cmd}}]} |
   	 build_toolbar(Rest, Used+3)];    
   build_toolbar([{Gif,Url,Cmd}|Rest], Used) ->
       (if Used == -1 ->
  
positive.code: 		   [{td,[{valign,middle},{align,left},{width,"15%"},
  			 {height,25}],
  		     {font, [{color,"#000000"},{size,2}],
  		      {nobr,[],{pre_html,"&nbsp;From:&nbsp;"}}}},
  		    {td, [{valign,middle},{align,left}],
  		     {font, [{color,"#000000"},{size,2}],
  		      [{pre_html,"&nbsp;"},
  		       unquote(From)]}},
  		    {td,[{valign,middle},{align,right},{height,"25"}],
  		     {font, [{color,"#000000"},{size,2}],
  		      {nobr,[],{pre_html,"&nbsp;Sent:&nbsp;"}}}},
  		    {td, [nowrap,{valign,middle},{align,right},
  			  {width,"30%"}],
  		     {font, [{color,"#000000"},{size,2}],
  		      {pre_html,"&nbsp;"++H#mail.date}}}]},
  		  {tr,[],
  		   [{td,[{valign,top},{align,left},{width,"15%"},
  			 {height,25}],
  		     {font, [{color,"#000000"},{size,2}],
  		      {nobr,[],{pre_html,"&nbsp;To:&nbsp;"}}}},
  		    {td, [{valign,top},{align,left},{width,"100%"}],
  		     {font, [{color,"#000000"},{size,2}],
  		      [{pre_html,"&nbsp;"},
  		       unquote(To)]}}]},
  		  {tr,[],
  		   [{td,[{valign,middle},{align,left},{width,"15%"},
  			 {height,25}],
  		     {font, [{color,"#000000"},{size,2}],
  		      {nobr,[],{pre_html,"&nbsp;Cc:&nbsp;"}}}},
  		    {td, [{valign,middle},{align,left},{width,"100%"}],
  		     {font, [{color,"#000000"},{size,2}],
  		      [{pre_html,"&nbsp;"},CC]}}]},
  		  {tr,[],
  		   [{td,[{valign,middle},{align,left},{width,"15%"},
  			 {height,25}],
  		     {font, [{color,"#000000"},{size,2}],
  		      {nobr,[],{pre_html,"&nbsp;Subject:&nbsp;"}}}},
  		    {td, [{valign,middle},{align,left},{width,"100%"}],
  		     {font, [{color,"#000000"},{size,2}],
  		      [{pre_html,"&nbsp;"},Subject]}}]}
  		 ]},
  		{table, [{width,"100%"},{border,1},{cellpadding,6},
  			 {class,msgbody}],
  
negative.code:     parse_key_value(O, []).
  
  parse_key_value([], Acc) ->
      {string:strip(lists:reverse(Acc)), []};
  parse_key_value([$=|Rest], Acc) ->
      Value = unquote(string:strip(Rest)),
      Key = lowercase(string:strip(lists:reverse(Acc))),
      {Key, Value};
  parse_key_value([C|Cs], Acc) ->
      parse_key_value(Cs, [C|Acc]).
  