anchor.diff:  %% Descrip.: determine if request is a properly formed wildcard
   %%           request (see RFC 3261 Chapter 10 page 64 - step 6)
   %% Returns : true     |
  -%%           SipError
  +%%           false    |
  +%%           throw({siperror, ...})
   %% - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
   %% there is only one Contact and it's a wildcard
   is_valid_wildcard_request(Header, [ #contact{urlstr = "*"} ]) ->
  -    Expire = sipheader:expire(Header),
  -    case Expire of
  -	[$0 | _] ->
  +    case sipheader:expire(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
   		0 ->
  
positive.code: %%--------------------------------------------------------------------
  
  -module(siplocation).
  
  %%--------------------------------------------------------------------
  %% External exports
  
negative.code: 	    logger:log(error, "Database: unregister of registrations failed for one or more"
  		       " contact entries, due to: ~p",
  		       [Reason]),
  	    {siperror, 500, "Server Internal Error"};
  	{atomic, _ResultOfFun} ->
  	    ok
      end.
  