Format

src/library/exposed/Hasql/Pool.hs

@@ -10,16 +10,16 @@ module Hasql.Pool
   )
 where
 
-import qualified Data.Text.Encoding as Text
-import qualified Data.Text.Encoding.Error as Text
-import qualified Data.UUID.V4 as Uuid
+import Data.Text.Encoding qualified as Text
+import Data.Text.Encoding.Error qualified as Text
+import Data.UUID.V4 qualified as Uuid
 import Hasql.Connection (Connection)
-import qualified Hasql.Connection as Connection
-import qualified Hasql.Pool.Config.Config as Config
+import Hasql.Connection qualified as Connection
+import Hasql.Pool.Config.Config qualified as Config
 import Hasql.Pool.Observation
 import Hasql.Pool.Prelude
-import qualified Hasql.Pool.SessionErrorDestructors as ErrorsDestruction
-import qualified Hasql.Session as Session
+import Hasql.Pool.SessionErrorDestructors qualified as ErrorsDestruction
+import Hasql.Session qualified as Session
 
 -- | A connection tagged with metadata.
 data Entry = Entry

src/library/exposed/Hasql/Pool/Config.hs

@@ -14,8 +14,8 @@ module Hasql.Pool.Config
   )
 where
 
-import qualified Hasql.Pool.Config.Config as Config
-import qualified Hasql.Pool.Config.Setting as Setting
+import Hasql.Pool.Config.Config qualified as Config
+import Hasql.Pool.Config.Setting qualified as Setting
 import Hasql.Pool.Prelude
 
 -- | Compile config from a list of settings.

src/library/exposed/Hasql/Pool/Config/Defaults.hs

@@ -1,9 +1,9 @@
 module Hasql.Pool.Config.Defaults where
 
-import qualified Hasql.Connection as Connection
+import Hasql.Connection qualified as Connection
 import Hasql.Pool.Observation (Observation)
 import Hasql.Pool.Prelude
-import qualified Hasql.Session as Session
+import Hasql.Session qualified as Session
 
 -- |
 -- 3 connections.

src/library/exposed/Hasql/Pool/Observation.hs

@@ -5,7 +5,7 @@
 module Hasql.Pool.Observation where
 
 import Hasql.Pool.Prelude
-import qualified Hasql.Session as Session
+import Hasql.Session qualified as Session
 
 -- | An observation of a change of the state of a pool.
 data Observation

src/library/other/Hasql/Pool/Config/Config.hs

@@ -1,10 +1,10 @@
 module Hasql.Pool.Config.Config where
 
-import qualified Hasql.Connection as Connection
-import qualified Hasql.Pool.Config.Defaults as Defaults
+import Hasql.Connection qualified as Connection
+import Hasql.Pool.Config.Defaults qualified as Defaults
 import Hasql.Pool.Observation (Observation)
 import Hasql.Pool.Prelude
-import qualified Hasql.Session as Session
+import Hasql.Session qualified as Session
 
 -- | Configufation for Hasql connection pool.
 data Config = Config

src/library/other/Hasql/Pool/Config/Setting.hs

@@ -1,11 +1,11 @@
 module Hasql.Pool.Config.Setting where
 
-import qualified Hasql.Connection as Connection
+import Hasql.Connection qualified as Connection
 import Hasql.Pool.Config.Config (Config)
-import qualified Hasql.Pool.Config.Config as Config
+import Hasql.Pool.Config.Config qualified as Config
 import Hasql.Pool.Observation (Observation)
 import Hasql.Pool.Prelude
-import qualified Hasql.Session as Session
+import Hasql.Session qualified as Session
 
 apply :: Setting -> Config -> Config
 apply (Setting run) = run

src/library/other/Hasql/Pool/SessionErrorDestructors.hs

@@ -1,7 +1,7 @@
 module Hasql.Pool.SessionErrorDestructors where
 
 import Hasql.Pool.Prelude
-import qualified Hasql.Session as Session
+import Hasql.Session qualified as Session
 
 reset :: (Maybe ByteString -> x) -> x -> Session.SessionError -> x
 reset onReset onNoReset = \case

src/test/Main.hs

@@ -1,17 +1,17 @@
 module Main where
 
 import Control.Concurrent.Async (race)
-import qualified Data.ByteString.Char8 as B8
-import qualified Data.Text as Text
-import qualified Hasql.Connection as Connection
-import qualified Hasql.Decoders as Decoders
-import qualified Hasql.Encoders as Encoders
+import Data.ByteString.Char8 qualified as B8
+import Data.Text qualified as Text
+import Hasql.Connection qualified as Connection
+import Hasql.Decoders qualified as Decoders
+import Hasql.Encoders qualified as Encoders
 import Hasql.Pool
-import qualified Hasql.Pool.Config as Config
-import qualified Hasql.Session as Session
-import qualified Hasql.Statement as Statement
-import qualified System.Environment
-import qualified System.Random.Stateful as Random
+import Hasql.Pool.Config qualified as Config
+import Hasql.Session qualified as Session
+import Hasql.Statement qualified as Statement
+import System.Environment qualified
+import System.Random.Stateful qualified as Random
 import Test.Hspec
 import Prelude