From 81e3beed73c5a7e536d1efa229777e78bc652e7a Mon Sep 17 00:00:00 2001
From: Paolo Capriotti <paolo@capriotti.io>
Date: Thu, 18 Apr 2024 14:45:02 +0200
Subject: [PATCH] Lint

---
 libs/polysemy-wire-zoo/default.nix     | 2 ++
 libs/wire-api/src/Wire/API/MLS/Keys.hs | 2 +-
 services/galley/src/Galley/API/MLS.hs  | 3 +--
 3 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/libs/polysemy-wire-zoo/default.nix b/libs/polysemy-wire-zoo/default.nix
index e5a88e3be19..ebf7e8de8c5 100644
--- 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
index 85a844bb5a8..f93c26321dd 100644
--- 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
index 0e6e6328e22..2b8c0b6fd67 100644
--- 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