anchor.diff:  		    {ehtml,format_error("Failed to send email.")};
   		{error, Reason} ->
   		    {ehtml,
  -		     format_error("Failed to send email. Reason: "++Reason)}
  +		     format_error("Failed to send email. Reason: "++
  +				  to_string(Reason))}
   	    end
       end.
   
  
positive.code: 
  
  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  
  format_error(Reason) ->
      [build_toolbar([{"","mail.yaws","Close"}]),
  
negative.code: 	    {error, Reason} ->
  		case string:str(lowercase(Reason), "lock") of
  		    0 ->
  			format_error(to_string(Reason));
  		    N ->
  			sleep(?RETRYTIMEOUT),
  			showmail(Session, MailNr, Count-1)
  