anchor.diff:      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.
  +	Other ->
  +	    is_sips_uri(Other)
  +    end;
  +is_sips_uri(Other) ->
  +    Msg = io_lib:format("Unparsable Contact/Record-Route/Request-URI '~p' when creating dialog state",
  +			[Other]),
  +    throw({error, lists:flatten(Msg)}).
   
   
   %%--------------------------------------------------------------------
  
positive.code: 			is_sips_uri([FirstRR])
  		end
  	end,
      ResponseContactIsSecure = is_sips_uri(ResponseContact),
  
      %% RFC3261 #12.1.1 (UAS behavior) :
      %% If the request that initiated the dialog contained a
  
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 ->
  