anchor.diff:  		    {get_more, Cont, NewState};
   		{error, Reason} ->
   		    {ehtml,
  -		     format_error("Failed to send email. Reason: "++Reason)}
  +		     format_error("Failed to send email. Reason: "++
  +				  to_string(Reason))}
   	    end;
   	{result, Res} ->
   	    case catch sendChunk(Res, State#send{last=true}) of
  
positive.code: 
  
  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  
  format_error(Reason) ->
      [build_toolbar([{"","mail.yaws","Close"}]),
  
negative.code: 	{error, Reason} ->
  	    case string:str(lowercase(Reason), "lock") of
  		0 ->
  		    {ehtml,format_error(to_string(Reason))};
  		N ->
  		    sleep(?RETRYTIMEOUT),
  		    list_msg(Session, Refresh, Sort, Count-1)
  