diff options
Diffstat (limited to 'src/ejabberd_admin.erl')
| -rw-r--r-- | src/ejabberd_admin.erl | 13 |
1 files changed, 8 insertions, 5 deletions
diff --git a/src/ejabberd_admin.erl b/src/ejabberd_admin.erl index b7fbbd00c..40c8b8dca 100644 --- a/src/ejabberd_admin.erl +++ b/src/ejabberd_admin.erl @@ -373,13 +373,16 @@ import_dir(Path) -> %%% delete_expired_messages() -> - {atomic, ok} = mod_offline:remove_expired_messages(), - ok. + lists:foreach( + fun(Host) -> + {atomic, ok} = mod_offline:remove_expired_messages(Host) + end, ?MYHOSTS). delete_old_messages(Days) -> - {atomic, _} = mod_offline:remove_old_messages(Days), - ok. - + lists:foreach( + fun(Host) -> + {atomic, _} = mod_offline:remove_old_messages(Days, Host) + end, ?MYHOSTS). %%% %%% Mnesia management |