anchor.diff:  %%           Socket       = term()
   %%           Local        = term() ({Host, Port} tuple())
   %%           Remote       = term() ({Host, Port} tuple())
  -%%           SSLHost      = string() | undefined, hostname to verify
  -%%                          a SSL certificate against
  +%%           SSLHost      = string(), hostname to verify a SSL
  +%%                          certificate against (or IP address of
  +%%                          remote host if this is an inbound
  +%%                          connection).
   %% Descrip.: Initialize this tcp_connection process to handle Socket.
   %% Returns : {ok, State, Timeout} |
   %%           {stop, Reason}
  
positive.code: %% Descrip.: A request to close this connection.
  %% Returns : {stop, normal, NewState}
  %%--------------------------------------------------------------------
  handle_cast({close, _From}, State) ->
      %% XXX check that From is someone sensible?
      Duration = util:timestamp() - State#state.starttime,
      {IP, Port} = State#state.remote,
      logger:log(debug, "TCP connection: Closing connection with ~p:~s:~p (duration: ~p seconds)",
  	       [State#state.proto, IP, Port, Duration]),
      SocketModule = State#state.socketmodule,
      SocketModule:close(State#state.socket),
      {stop, normal, State#state{socket=undefined}};
  
  %%--------------------------------------------------------------------
  
negative.code: 			       "considering SSL connection from ~s:~p invalid : ~p", [Host, Port, Reason]),
  		    false;
  		{in, false} ->
  		    logger:log(debug, "TCP connection: Could not get SSL subject information for connection "
  			       "from ~s:~p : ~p", [Host, Port, Reason]),
  		    true;
  		{out, _RequireClientCert} ->
  		    logger:log(debug, "TCP connection: Could not get SSL subject information, "
  