From 776fe8b32ac9958271af16722664e8486f18ef14 Mon Sep 17 00:00:00 2001
From: Evgeniy Khramtsov <ekhramtsov@process-one.net>
Date: Wed, 13 Jan 2016 11:45:08 +0300
Subject: [PATCH] Fix MAM MUC for v0.4.1

---
 src/mod_mam.erl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/mod_mam.erl b/src/mod_mam.erl
index f334152f7..95fe4964e 100644
--- a/src/mod_mam.erl
+++ b/src/mod_mam.erl
@@ -255,8 +255,8 @@ muc_process_iq(#iq{type = set, lang = Lang,
 		   sub_el = #xmlel{name = <<"query">>,
 				   attrs = Attrs} = SubEl} = IQ,
 	       MUCState, From, To) ->
-    case xml:get_attr_s(<<"xmlns">>, Attrs) of
-	?NS_MAM_0 ->
+    XMLNS = xml:get_attr_s(<<"xmlns">>, Attrs),
+    if XMLNS == ?NS_MAM_0; XMLNS == ?NS_MAM_1 ->
 	    LServer = MUCState#state.server_host,
 	    Role = mod_muc_room:get_role(From, MUCState),
 	    Config = MUCState#state.config,
@@ -277,7 +277,7 @@ muc_process_iq(#iq{type = set, lang = Lang,
 			       get_xdata_fields(SubEl),
 			       {groupchat, Role, MUCState})
 	    end;
-	_ ->
+       true ->
 	    IQ
     end;
 muc_process_iq(IQ, _MUCState, _From, _To) ->