diff options
Diffstat (limited to 'src/mod_roster.erl')
| -rw-r--r-- | src/mod_roster.erl | 13 |
1 files changed, 12 insertions, 1 deletions
diff --git a/src/mod_roster.erl b/src/mod_roster.erl index ea8e48a58..22a1d1855 100644 --- a/src/mod_roster.erl +++ b/src/mod_roster.erl @@ -17,7 +17,8 @@ process_local_iq/3, get_subscription_lists/1, in_subscription/3, - out_subscription/3]). + out_subscription/3, + remove_user/1]). -include_lib("mnemosyne/include/mnemosyne.hrl"). -include("ejabberd.hrl"). @@ -459,3 +460,13 @@ out_subscription(User, JID, Type) -> false end. +remove_user(User) -> + LUser = jlib:tolower(User), + F = fun() -> + lists:foreach(fun(R) -> + mnesia:delete_object(R) + end, + mnesia:index_read(roster, LUser, #roster.user)) + end, + mnesia:transaction(F). + |