anchor.diff:  %% Returns : Addresses, list() of address record()
   %%--------------------------------------------------------------------
   get_addresses_using_user(Username) when is_list(Username) ->
  -    case get_user(Username) of
  -	nomatch ->
  -	    logger:log(error, "userdb-file: No user named ~p, can't look up addresses", [Username]),
  -	    [];
  -	User when is_record(User, user) ->
  -	    get_addresses_using_user2(Username, fetch_addresses(), [])
  -    end;
  +    get_addresses_using_user2(Username, fetch_addresses(), []);
   get_addresses_using_user(User) when is_record(User, user) ->
       get_addresses_using_user2(User#user.name, fetch_addresses(), []).
   
  
positive.code: %%--------------------------------------------------------------------
  %% Function: get_forward_for_user(Username)
  %%           Username = string()
  %% Descrip.: Return the forward address for a user.
  %% Returns : Forward |
  %%           nomatch |
  %%           error
  %%           Forward = string()
  %%--------------------------------------------------------------------
  get_forward_for_user(Username) ->
      case get_user(Username) of
  
negative.code: %%           find out to which users we should send a request.
  %% Returns : Users |
  %%           error
  %%           Users = list() of string()
  %%--------------------------------------------------------------------
  get_users_for_address_of_record(Address) ->
      get_users_using_address(Address).
  
  
  %%--------------------------------------------------------------------
  