anchor.diff:  %%% Internal functions
   %%--------------------------------------------------------------------
   start_daemon(Host, Port, Options, Inet) ->
  -    {SocketOpts, Opts} = handle_options(Options),
  +    case handle_options(Options) of
  +	{error, _Reason} = Error ->
  +	    Error;
  +	{SocketOptions, SshOptions}->
  +	    do_start_daemon(Host, Port,[{role, server} |SshOptions] , [Inet | SocketOptions])
  +    end.
  +    
  +do_start_daemon(Host, Port, Options, SocketOptions) ->
       case ssh_system_sup:system_supervisor(Host, Port) of
   	undefined ->
   	    %% TODO: It would proably make more sense to call the
  
positive.code: 		%% match the Manager in this case
  		{_, not_connected, {error, econnrefused}} when DisableIpv6 == false ->
  		    do_demonitor(MRef, Manager),
  		    connect(Host, Port, [{ip_v6_disabled, true} | Options], Timeout);
  		{_, not_connected, {error, Reason}} ->
  		    do_demonitor(MRef, Manager),
  		    {error, Reason};
  
negative.code: 				    {HostAddr, inet6, 
  				     [{ip, HostAddr} | Options1]}
  			    end,
      start_daemon(Host, Port, Options, Inet).
  
  %%--------------------------------------------------------------------
  %% Function: stop_listener(SysRef) -> ok
  