aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/mod_mam_mnesia.erl5
1 files changed, 4 insertions, 1 deletions
diff --git a/src/mod_mam_mnesia.erl b/src/mod_mam_mnesia.erl
index 10b98daf7..2463690fd 100644
--- a/src/mod_mam_mnesia.erl
+++ b/src/mod_mam_mnesia.erl
@@ -52,7 +52,10 @@ remove_room(_LServer, LName, LHost) ->
remove_user(LName, LHost).
delete_old_messages(global, TimeStamp, Type) ->
- delete_old_user_messages(mnesia:dirty_first(archive_msg), TimeStamp, Type).
+ mnesia:change_table_copy_type(archive_msg, node(), disc_copies),
+ Result = delete_old_user_messages(mnesia:dirty_first(archive_msg), TimeStamp, Type),
+ mnesia:change_table_copy_type(archive_msg, node(), disc_only_copies),
+ Result.
delete_old_user_messages('$end_of_table', _TimeStamp, _Type) ->
ok;