anchor.diff:  %%           of names we expect.
   %% Returns : true | false
   %%--------------------------------------------------------------------
  -is_valid_ssl_certname(ValidNames, Subject, Reject) when Reject == true; Reject == false ->
  +is_valid_ssl_certname(ValidNames, Subject, Reject) when is_list(ValidNames), is_list(Subject), Reject == true; Reject == false ->
       {ok, AltName} = get_ssl_socket_altname(Subject),
       Matches = util:casegrep(AltName, ValidNames),
       case {Matches, Reject} of
   	{true, _Reject} ->
  -	    logger:log(debug, "TCP connection: Verified that subjectAltName/CN (~p) is in list of "
  +	    logger:log(debug, "Transport layer: Verified that subjectAltName/CN (~p) is in list of "
   		       "valid names for this certificate (~p)", [AltName, ValidNames]),
   	    true;
   	{false, true} ->
  
positive.code: 
  handle_info(Info, State) ->
      logger:log(debug, "TCP connection: Received unknown gen_server info :~n~p", [Info]),
      {noreply, State}.
  
  %%--------------------------------------------------------------------
  %% Function: terminate(Reason, State)
  
negative.code: 
  handle_cast(Msg, State) ->
      logger:log(error, "TCP connection: Received unknown gen_server cast : ~p", [Msg]),
      {noreply, State, State#state.timeout}.
  
  
  %%--------------------------------------------------------------------
  