Avoid cleanup on bag when disc_only, switch in memory (#1161)

processone · Jun 21, 2016 · b2f53fb · b2f53fb
1 parent c91c5aa
commit b2f53fb
Showing 1 changed file with 4 additions and 1 deletion.
diff --git 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;