anchor.diff:  %% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
   %% there is only one Contact and it's a wildcard
   is_valid_wildcard_request(Header, [ #contact{urlstr = "*"} ]) ->
  -    case sipheader:expire(Header) of
  +    case sipheader:expires(Header) of
   	[Expire] ->
   	    %% cast to integer so that "0", "00" ... and so on are all considered as 0
   	    case catch list_to_integer(Expire) of
  
positive.code: %% Function: parse_register_contact_expire(Header, Contact)
  %%           parse_register_contact_expire(ExpireHeader, Contact)
  %%           Header  = keylist record(), the request headers
  %%           ExpireHeader = sipheader:expire(Header) return value
  %%           Contact = contact record(), a contact entry from a request
  %% Descrip.: determine the expire time supplied for a contact in a SIP
  %%           REGISTER request
  
negative.code: 
      %% get expire value from request header only once, this will speed up the calls to
      %% parse_register_contact_expire/2 that are done for each Locations entry
      ExpireHeader = sipheader:expires(RequestHeader),
      F = fun(Location) ->
  		process_non_wildcard_contact(LogTag, SipUser, Location,
  					     RequestCallId, RequestCSeq, ExpireHeader)
  