From 04d0efb54571e4e45952a661646c2ba40f058f64 Mon Sep 17 00:00:00 2001 From: Saku Laesvuori Date: Fri, 29 Sep 2023 13:37:19 +0300 Subject: [PATCH] Remove redundant imports --- backend/src/Datarekisteri/Backend/Types.hs | 13 ++----------- 1 file changed, 2 insertions(+), 11 deletions(-) diff --git a/backend/src/Datarekisteri/Backend/Types.hs b/backend/src/Datarekisteri/Backend/Types.hs index 54508e4..5a2dd97 100644 --- a/backend/src/Datarekisteri/Backend/Types.hs +++ b/backend/src/Datarekisteri/Backend/Types.hs @@ -19,20 +19,11 @@ import Datarekisteri.Core.Types import Data.Aeson (ToJSON(..), FromJSON(..)) import Data.ByteArray (ByteArray, ByteArrayAccess) import Data.Morpheus.App.Internal.Resolving (Resolver, LiftOperation) -import Data.Morpheus.Server.Types (SCALAR) -import Data.Morpheus.Types (GQLType, DecodeScalar(..), KIND, EncodeScalar(..), - ScalarValue(..), MonadError, GQLError) -import Data.Morpheus.Types.GQLScalar (scalarToJSON, scalarFromJSON) -import Data.Time (UTCTime, getCurrentTime, NominalDiffTime, addUTCTime, Day) -import Data.Time.Format.ISO8601 (iso8601Show, iso8601ParseM) -import qualified Data.Text as T -import Data.Char (isSpace) +import Data.Morpheus.Types (MonadError, GQLError) +import Data.Time (getCurrentTime) import Database.Persist.Class (PersistField(..)) -import Database.Persist.PersistValue (PersistValue(..)) import Database.Persist.Sql (PersistFieldSql(..), SqlBackend) import Network.Mail.Mime (Mail, Address(..)) -import Text.Email.Validate (EmailAddress, toByteString, validate, emailAddress) -import qualified "base64" Data.ByteString.Base64 as B64 (encodeBase64, decodeBase64) import "cryptonite" Crypto.Random (MonadRandom(..)) forward :: Monad m => [a] -> m [Maybe a]