anchor.diff:  			is_sips_uri([FirstRR])
   		end
   	end,
  -    ResponseContactIsSecure = is_sips_uri(ResponseContact),
  +    ResponseContactIsSecure = is_sips_uri([ResponseContact]),
   
       %% RFC3261 #12.1.1 (UAS behavior) :
       %% If the request that initiated the dialog contained a
  
positive.code:     case contact:parse([Str]) of
  	[C] when is_record(C, contact) ->
  	    is_sips_uri(sipurl:parse(C#contact.urlstr));
  	_ ->
  	    throw({error, "Unparsable Contact/Record-Route/Request-URI when creating dialog state"})
      end.
  
  
  %%--------------------------------------------------------------------
  
negative.code: %%--------------------------------------------------------------------
  create_dialog_state_uas_is_secure(Request, []) when is_record(Request, request) ->
      throw({error, response_contact_missing});
  create_dialog_state_uas_is_secure(Request, [ResponseContact]) when is_record(Request, request),
  								   is_list(ResponseContact) ->
      MustBeSecure =
  	case is_sips_uri(Request#request.uri) of
  	    true ->
  