Fix content type used when testing MLS commit bundles (#2795)

* Fix content type used when testing MLS commit bundles

* shellcheck .cabal file

* Must not forget to regen derivations

Author: elland

libs/polysemy-wire-zoo/default.nix

@@ -2,10 +2,10 @@
 # This file is generated by running hack/bin/generate-local-nix-packages.sh and
 # must be regenerated whenever local packages are added or removed, or
 # dependencies are added or removed.
-{ mkDerivation, base, cassandra-util, gitignoreSource, HsOpenSSL
-, hspec, imports, lib, polysemy, polysemy-check, polysemy-plugin
-, QuickCheck, saml2-web-sso, time, tinylog, types-common, unliftio
-, uuid, wire-api
+{ mkDerivation, base, cassandra-util, containers, gitignoreSource
+, HsOpenSSL, hspec, hspec-discover, imports, lib, polysemy
+, polysemy-check, polysemy-plugin, QuickCheck, saml2-web-sso, time
+, tinylog, types-common, unliftio, uuid, wire-api
 }:
 mkDerivation {
   pname = "polysemy-wire-zoo";
@@ -16,6 +16,11 @@ mkDerivation {
     polysemy-plugin QuickCheck saml2-web-sso time tinylog types-common
     unliftio uuid wire-api
   ];
+  testHaskellDepends = [
+    base containers hspec imports polysemy polysemy-check
+    polysemy-plugin unliftio
+  ];
+  testToolDepends = [ hspec-discover ];
   description = "Polysemy interface for various libraries";
   license = lib.licenses.agpl3Only;
 }

libs/polysemy-wire-zoo/polysemy-wire-zoo.cabal

@@ -96,7 +96,6 @@ library
 
   default-language:   Haskell2010
 
-
 test-suite spec
   type:               exitcode-stdio-1.0
   main-is:            Spec.hs
@@ -158,7 +157,7 @@ test-suite spec
     , hspec
     , imports
     , polysemy
-    , polysemy-check             >=0.9
+    , polysemy-check     >=0.9
     , polysemy-plugin
     , polysemy-wire-zoo
     , unliftio

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

@@ -136,7 +136,7 @@ postCommitBundle sender bundle = do
     ( galley . paths ["mls", "commit-bundles"]
         . zUser sender
         . zConn "conn"
-        . content "application/vnd.wire.commit-bundle"
+        . content "application/x-protobuf"
         . bytes bundle
     )