anchor.diff:  		  {table, [{border,0},{cellspacing,0},{cellpadding,1},
   			   {width,"100%"}],
   		   [{tr, [{bgcolor,"c0c0c0"},{valign,middle}],
  -		     [{th,[{class,head}],
  +		     [{th,[{align,left},{valign,middle},{class,head}],
  +		       {font,[{size,2},{color,black}],"Nr"}},
  +		      {th,[{class,head}],
   		       {img,[{src,"view-mark.gif"},{width,13},
   			     {height,13}],[]}},
   		      {th,[{align,left},{valign,middle},{class,head}],
  
positive.code: 		      {th,[{align,left},{valign,middle},{class,head}],
  		       {font,[{size,2},{color,black}],"Subject"}},
  		      {th,[{align,left},{valign,middle},{class,head}],
  		       {font,[{size,2},{color,black}],"Size"}}]}] ++
  		   format_summary(H)},
  		  {input,[{type,hidden},{name,cmd},{value,""}],[]}
  
negative.code: 			  {NewHead, Body}
  		  end, Parts),
  	    {H1,B1} = select_alt_body(["text/html","text/plain"],HParts),
  	    format_body(H1,B1,Depth++".1");
  	{{"multipart/signed",Opts}, Encoding} ->
  	    {value, {_,Boundary}} = lists:keysearch("boundary",1,Opts),
  	    [{Headers,Body}|Parts] = parse_multipart(Msg, Boundary),
  