anchor.diff:      Reply = gen_smtp_client:send_blocking({Sender, Rcpts, Body}, Options),
       case Reply of
           {error, _, Reason} ->
  -            ?user_log(0001, "error sending mail: ~p", [Reason]);
  +            ale:warn(?USER_LOGGER,
  +                     "Could not send email: ~p. "
  +                     "Make sure that your email settings are correct.", [Reason]);
           _ -> ok
       end,
       {reply, Reply, State};
  
positive.code: -export([init/1, handle_call/3, handle_cast/2, handle_info/2, terminate/2,
           code_change/3]).
  
  -export([send/5, ns_log_cat/1]).
  
  -include("ns_common.hrl").
  
  
negative.code:     gen_server:call(?MODULE, {send, Sender, Rcpts, binary_to_list(Message),
                                Options}).
  
  %% Internal functions
  
  format_addr(Rcpts) ->
  