anchor.diff:  
   
       BasicOpts = [binary, {active, once}],
  -    SocketOpts = case InterfaceIp of
  -               undefined -> BasicOpts;
  -               _         -> BasicOpts ++ {ip, InterfaceIp} end,
  +    SocketOpts = case Interface of
  +                     undefined -> BasicOpts;
  +                     _         -> BasicOpts ++ {ip, iface_to_ip_address(Interface)}
  +                 end,
   
       {ok, Socket} = do_connect(IsSSLConnection, Address, Port, Args,
                                 SocketOpts, OnConnectFun),
  
positive.code: 
      Address = host_to_inet(Host),
      EventClient = proplists:get_value(event_client, Args),
      InterfaceIp = proplists:get_value(ip, Args),
      IsSSLConnection = proplists:get_value(ssl, Args, false),
  
      OnReplyFun = proplists:get_value(on_reply, Args, fun(_) -> ok end),
  
negative.code: host_to_inet(Address) when is_list(Address) orelse is_atom(Address) -> Address;
  host_to_inet(BAddress) when is_binary(BAddress) -> binary_to_list(BAddress).
  
  iface_to_ip_address({_,_,_,_} = IP4) -> IP4;
  iface_to_ip_address({_,_,_,_,_,_,_,_} = IP6) -> IP6.
  
  close_compression_streams(false) ->
      ok;
  close_compression_streams({zlib, {Zin, Zout}}) ->
  