anchor.diff:  daemon_info(Pid) ->
       case catch ssh_system_sup:acceptor_supervisor(Pid) of
   	AsupPid when is_pid(AsupPid) ->
  -	    [{Name,Port,Profile}] =
  -		[{Nam,Prt,Prf} 
  +	    [{IP,Port,Profile}] =
  +		[{IP,Prt,Prf} 
                    || {{ssh_acceptor_sup,Hst,Prt,Prf},_Pid,worker,[ssh_acceptor]} 
                           <- supervisor:which_children(AsupPid),
  -                    Nam <- [case inet:parse_strict_address(Hst) of
  -                                {ok,IP} -> IP;
  -                                _ when Hst=="any" -> any;
  -                                _ when Hst=="loopback" -> loopback;
  -                                _ -> Hst
  -                            end]
  +                    IP <- [case inet:parse_strict_address(Hst) of
  +                               {ok,IP} -> IP;
  +                               _ -> Hst
  +                           end]
                   ],
   	    {ok, [{port,Port},
  -                  {name,Name},
  +                  {ip,IP},
                     {profile,Profile}
                    ]};
   	_ ->
   	    {error,bad_daemon_ref}
       end.
   
  -
  -
   %%--------------------------------------------------------------------
   -spec stop_listener(daemon_ref()) -> ok.
   -spec stop_listener(inet:ip_address(), inet:port_number()) -> ok.
  
positive.code: -include("ssh_connect.hrl").
  -include_lib("public_key/include/public_key.hrl").
  -include_lib("kernel/include/file.hrl").
  
  -export([start/0, start/1, stop/0,
  	 connect/2, connect/3, connect/4,
  
negative.code:     ssh_system_sup:stop_listener(SysSup).
  stop_listener(Address, Port) ->
      stop_listener(Address, Port, ?DEFAULT_PROFILE).
  stop_listener(any, Port, Profile) ->
      map_ip(fun(IP) ->
                     ssh_system_sup:stop_listener(IP, Port, Profile) 
             end, [{0,0,0,0},{0,0,0,0,0,0,0,0}]);
  stop_listener(Address, Port, Profile) ->
      map_ip(fun(IP) ->
                     ssh_system_sup:stop_listener(IP, Port, Profile) 
             end, {address,Address}).
  
  %%--------------------------------------------------------------------
  -spec stop_daemon(daemon_ref()) -> ok.
  