diff options
author | Alexey Shchepin <alexey@process-one.net> | 2003-01-26 20:16:53 +0000 |
---|---|---|
committer | Alexey Shchepin <alexey@process-one.net> | 2003-01-26 20:16:53 +0000 |
commit | aed24c637fea62e0a72636fd0a1714a9ecd16a6b (patch) | |
tree | 612296a521a90c06d582d5745c09981ea859d93e /src/ejabberd_auth.erl | |
parent | *** empty log message *** (diff) |
*** empty log message ***
SVN Revision: 51
Diffstat (limited to 'src/ejabberd_auth.erl')
-rw-r--r-- | src/ejabberd_auth.erl | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/src/ejabberd_auth.erl b/src/ejabberd_auth.erl index 7715a01f..d280a429 100644 --- a/src/ejabberd_auth.erl +++ b/src/ejabberd_auth.erl @@ -23,7 +23,8 @@ try_register/2, dirty_get_registered_users/0, get_password_s/1, - is_user_exists/1]). + is_user_exists/1, + remove_user/1]). %% gen_server callbacks -export([init/1, @@ -198,3 +199,10 @@ is_user_exists(User) -> _ -> false end. + +remove_user(User) -> + LUser = jlib:tolower(User), + F = fun() -> + mnesia:delete({passwd, LUser}) + end, + mnesia:transaction(F). |