format

NoRedInk · May 20, 2024 · 386357e · 386357e
1 parent 25878b6
commit 386357e
Show file tree

Hide file tree

Showing 3 changed files with 5 additions and 5 deletions.
diff --git a/nri-redis/src/Redis.hs b/nri-redis/src/Redis.hs
@@ -53,16 +53,16 @@ module Redis
 where
 
 import qualified Data.Aeson as Aeson
-import qualified Redis.Script as Script
-import qualified Database.Redis
 import qualified Data.ByteString as ByteString
 import Data.List.NonEmpty (NonEmpty)
 import qualified Data.List.NonEmpty as NonEmpty
+import qualified Database.Redis
 import qualified Dict
 import qualified NonEmptyDict
 import qualified Redis.Codec as Codec
 import qualified Redis.Handler as Handler
 import qualified Redis.Internal as Internal
+import qualified Redis.Script as Script
 import qualified Redis.Settings as Settings
 import qualified Prelude
 

diff --git a/nri-redis/src/Redis/Handler.hs b/nri-redis/src/Redis/Handler.hs
@@ -12,13 +12,13 @@ import Control.Monad.IO.Class (liftIO)
 import qualified Data.Acquire
 import qualified Data.ByteString
 import qualified Data.List.NonEmpty as NonEmpty
-import qualified Redis.Script as Script
 import qualified Data.Text.Encoding
 import qualified Database.Redis
 import qualified Dict
 import qualified GHC.Stack as Stack
 import qualified Platform
 import qualified Redis.Internal as Internal
+import qualified Redis.Script as Script
 import qualified Redis.Settings as Settings
 import qualified Set
 import qualified Text
@@ -167,7 +167,7 @@ doRawQuery query =
         |> PreparedQuery
         |> map (Ok << Prelude.fromIntegral)
     Internal.Eval script ->
-      Database.Redis.eval (toB (Script.luaScript script)) (map toB (Script.paramNames script)) (map toB(Script.paramValues script))
+      Database.Redis.eval (toB (Script.luaScript script)) (map toB (Script.paramNames script)) (map toB (Script.paramValues script))
         |> PreparedQuery
         |> map Ok
     Internal.Exists key ->

diff --git a/nri-redis/src/Redis/Internal.hs b/nri-redis/src/Redis/Internal.hs
@@ -37,8 +37,8 @@ import qualified List
 import qualified Log.RedisCommands as RedisCommands
 import NriPrelude hiding (map, map2, map3)
 import qualified Platform
-import qualified Redis.Settings as Settings
 import qualified Redis.Script as Script
+import qualified Redis.Settings as Settings
 import qualified Set
 import qualified Text
 import qualified Tuple