anchor.diff:  			       }).
   
   %%--------------------------------------------------------------------
  -%% Function:
  -%% Descrip.:
  -%% Returns :
  -%% XXX only used in admin_www.erl
  -%%--------------------------------------------------------------------
  -insert_user_or_password(User, Password) ->
  +%% Function: insert_user_or_password(User, Password)
  +%%           User     = string()
  +%%           Password = term()
  +%% Descrip.: Create a user, or set existing user's password.
  +%% Returns : term(), result of Mnesia transaction
  +%%--------------------------------------------------------------------
  +insert_user_or_password(User, Password) when is_list(User) ->
       Fun = fun() ->
   		  A = mnesia:read({user, User}),
    		  %% A = mnesia:match_object(#user{user = User,  _ = '_'}),
  
positive.code: %%           a new entry with a new Expire value
  %% Returns : The result of the mnesia:transaction()
  %%--------------------------------------------------------------------
  insert_purge_phone(SipUser, Flags, Class, Expire, Address, CallId, CSeq) when is_record(Address, sipurl) ->
      %% We store locations as strings in the location database, since any
      %% datastructure could have to be changed in the future
      LocationStr = sipurl:print(Address),
  
negative.code: %%--------------------------------------------------------------------
  %% Function: insert_purge_phone(SipUser, Flags, Class, Expire,
  %%                              Address, CallId, CSeq)
  %%           SipUser = string(), username
  %%           Flags   = list of {Name, Value}
  %%             Name  = atom()
  %%             Value = term(), but typically integer() or string()
  %%           Class   = static | dynamic
  %%           Expire  = integer() | never
  %%           Address = sipurl record()
  %%           CallId  = string()
  %%           CSeq    = integer()
  