Hotfix: Fixing how mls-test-cli is called (#3690)

WPB-5330: Remove command args that are upsetting mls-test-cli

Author: lepsa

changelog.d/3-bug-fixes/WPB-5330

@@ -0,0 +1 @@
+Updating tests to fix an issue calling `mls-test-cli`

integration/test/MLS/Util.hs

@@ -724,7 +724,7 @@ createApplicationMessage cid messageContent = do
   message <-
     mlscli
       cid
-      ["message", "--group-in", "<group-in>", messageContent, "--group-out", "<group-out>"]
+      ["message", "--group", "<group-in>", messageContent]
       Nothing
 
   pure

libs/wire-api/test/unit/Test/Wire/API/MLS.hs

@@ -123,7 +123,7 @@ testParseApplication = do
   msgData <- withSystemTempDirectory "mls" $ \tmp -> do
     void $ spawn (cli qcid tmp ["init", qcid]) Nothing
     groupJSON <- spawn (cli qcid tmp ["group", "create", "Zm9v"]) Nothing
-    spawn (cli qcid tmp ["message", "--group-in", "-", "hello"]) (Just groupJSON)
+    spawn (cli qcid tmp ["message", "--group", "-", "hello"]) (Just groupJSON)
 
   msg <- case decodeMLS' @Message msgData of
     Left err -> assertFailure (T.unpack err)

services/galley/test/integration/API/MLS/Util.hs

@@ -647,7 +647,7 @@ createApplicationMessage cid messageContent = do
   message <-
     mlscli
       cid
-      ["message", "--group-in", "<group-in>", messageContent, "--group-out", "<group-out>"]
+      ["message", "--group", "<group-in>", messageContent]
       Nothing
 
   pure $