anchor.diff:  	end,
       {atomic, L} = mnesia:transaction(F),
   
  -    Now = util:timestamp(),
  -
  -    %% Remove expired entrys and convert into siplocationdb_e record().
  -    %% Convert the location strings stored in the database to sipurl record format.
  -    %% We can't store the locations as sipurl records in the database in case we
  -    %% have to change something in the sipurl record.
  -    Rewrite =
  -	[ #siplocationdb_e{address	= sipurl:parse(E#phone.address),
  -			   sipuser	= E#phone.user,
  -			   instance	= E#phone.instance,
  -			   flags	= E#phone.flags,
  -			   class	= E#phone.class,
  -			   expire	= E#phone.expire
  -			  }
  -	  || E <- L, E#phone.expire > Now orelse E#phone.expire == never],
  -     {ok, Rewrite}.
  +    Rewrite = non_expired_phones_to_ldbe(L),
  +    {ok, Rewrite}.
   
   %%--------------------------------------------------------------------
   %% Function: get_phone(SipUser)
  
positive.code:     Rec = mnesia:transaction(F),
      Rec.
  
  
  %%====================================================================
  %% Internal functions
  
negative.code: 	 delete_phone_for_user/2,
  	 get_sipusers_using_contact/1,
  	 get_locations_using_contact/1,
  	 decode_mnesia_change_event/1,
  
  	 test/0,
  	 test_create_table/0
  