Start use disco_info_story/2 in disco_info and disco_info_with_mam tests

esl · Sep 24, 2021 · c0a6549 · c0a6549
1 parent 41d03c7
commit c0a6549
Showing 1 changed file with 11 additions and 2 deletions.
diff --git a/big_tests/tests/muc_light_SUITE.erl b/big_tests/tests/muc_light_SUITE.erl
@@ -316,10 +316,19 @@ disco_features_story(Config, HasMAM) ->
         end).
 
 disco_info(Config) ->
-    disco_features_story(Config, false).
+    disco_info_story(Config, false).
 
 disco_info_with_mam(Config) ->
-    disco_features_story(Config, true).
+    disco_info_story(Config, true).
+
+disco_info_story(Config, HasMAM) ->
+    escalus:story(Config, [{alice, 1}], fun(Alice) ->
+            DiscoStanza = escalus_stanza:to(escalus_stanza:iq_get(?NS_DISCO_INFO, []), ?ROOM),
+            escalus:send(Alice, DiscoStanza),
+            Stanza = escalus:wait_for_stanza(Alice),
+            check_features(Stanza, HasMAM),
+            escalus:assert(is_stanza_from, [?MUCHOST], Stanza)
+        end).
 
 check_features(Stanza, HasMAM) ->
     ExpectedFeatures = expected_features(HasMAM),