diff options
author | Holger Weiss <holger@zedat.fu-berlin.de> | 2019-02-21 22:19:29 +0100 |
---|---|---|
committer | Holger Weiss <holger@zedat.fu-berlin.de> | 2019-02-21 22:19:29 +0100 |
commit | 9a3a7369cb797d722e856553755c12be54a89d5d (patch) | |
tree | 783a48ea6a7cb822af581d01c5c3958a4473766b /src | |
parent | Merge branch 'mix' (diff) |
mod_mam_mnesia: Fix check for empty archive
Don't return 'true' if the key exists but points to an empty archive.
Also, avoid looking up all keys.
Diffstat (limited to 'src')
-rw-r--r-- | src/mod_mam_mnesia.erl | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/mod_mam_mnesia.erl b/src/mod_mam_mnesia.erl index f94dd2e49..dff10ef96 100644 --- a/src/mod_mam_mnesia.erl +++ b/src/mod_mam_mnesia.erl @@ -200,8 +200,7 @@ select(_LServer, JidRequestor, Result. is_empty_for_user(LUser, LServer) -> - not lists:member({LUser, LServer}, - mnesia:dirty_all_keys(archive_msg)). + mnesia:dirty_read(archive_msg, {LUser, LServer}) == []. is_empty_for_room(_LServer, LName, LHost) -> is_empty_for_user(LName, LHost). |