Fix problem with handling of old db entries in mod_mam

diff --git a/src/mod_mam.erl b/src/mod_mam.erl
index cfc1e213f78c268e394c4abb9133f1aa7c10c776..89b8ddadd4ac48be0d43dc99f4d136b5a2446c68 100644 (file)
--- a/src/mod_mam.erl
+++ b/src/mod_mam.erl
@@ -712,9 +712,10 @@ select(LServer, #jid{luser = LUser} = JidRequestor,
                       #xmlel{} = El = xml_stream:parse_element(XML),
                       Now = usec_to_now(jlib:binary_to_integer(TS)),
                       PeerJid = jid:tolower(jid:from_string(PeerBin)),
-                      T = if Kind /= <<"">> ->
-                                  jlib:binary_to_atom(Kind);
-                             true -> chat
+                      T = case Kind of
+                               <<"">> -> chat;
+                               null -> chat;
+                               _ -> jlib:binary_to_atom(Kind)
                           end,
                       {TS, jlib:binary_to_integer(TS),
                        msg_to_el(#archive_msg{timestamp = Now,