anchor.diff:      lists:reverse(States).
   
   send_mail(Sender, To, Message) ->
  +    lager:info("send_mail(Sender, To, Message)"),
       Host = econfig:get_value(javier, "smtp", "host"),
       Port = econfig:get_value(javier, "smtp", "port"),
    
  
positive.code:                         1 -> 
                              [SendFor | _] = Filtered,
                              #member{mail = Mail} = SendFor,  
                              send_mail(User, Mail, Content);
                          _ -> 
                              lager:info("member not found: ~p", [To])
                      end
  
negative.code:     From = econfig:get_value(javier, "smtp", "from"),
  
      SiteUrl = econfig:get_value(javier, "smtp", "site_url"),
      Body = io_lib:format("Hi. You got a message from @~s.\r\n\r\n~s\r\n\r\nPlease check the site.\r\n~s", [Sender, Message, SiteUrl]),
      MailBody = io_lib:format("Subject: ~s\r\nFrom: ~s \r\nTo: ~s \r\n\r\n~s", [Subject, From, To, Body]),
      lager:info("MailBody: ~p", [MailBody]),
      gen_smtp_client:send_blocking({From, [To], MailBody}, [{relay, Host}, {port, Port}]).
  