Lint

wireapp · Apr 18, 2024 · 81e3bee · 81e3bee
1 parent d670a4b
commit 81e3bee
Show file tree

Hide file tree

Showing 3 changed files with 4 additions and 3 deletions.
diff --git a/libs/polysemy-wire-zoo/default.nix b/libs/polysemy-wire-zoo/default.nix
@@ -8,6 +8,7 @@
 , bytestring
 , cassandra-util
 , containers
+, crypton
 , gitignoreSource
 , HsOpenSSL
 , hspec
@@ -36,6 +37,7 @@ mkDerivation {
     base
     bytestring
     cassandra-util
+    crypton
     HsOpenSSL
     hspec
     imports

diff --git a/libs/wire-api/src/Wire/API/MLS/Keys.hs b/libs/wire-api/src/Wire/API/MLS/Keys.hs
@@ -1,4 +1,4 @@
-{-# LANGUAGE GeneralizedNewtypeDeriving #-}
+
 
 -- This file is part of the Wire Server implementation.
 --

diff --git a/services/galley/src/Galley/API/MLS.hs b/services/galley/src/Galley/API/MLS.hs
@@ -44,5 +44,4 @@ getMLSPublicKeys ::
   Local UserId ->
   Sem r (MLSKeysByPurpose MLSPublicKeys)
 getMLSPublicKeys _ = do
-  keys <- getMLSPrivateKeys
-  pure $ fmap mlsKeysToPublic keys
+  fmap mlsKeysToPublic <$> getMLSPrivateKeys