diff --git a/postgresql-schema.cabal b/postgresql-schema.cabal
--- a/postgresql-schema.cabal
+++ b/postgresql-schema.cabal
@@ -1,5 +1,5 @@
 name: postgresql-schema
-version: 0.1.13
+version: 0.1.14
 cabal-version: >=1.22
 build-type: Simple
 license: BSD3
diff --git a/src/Database/PostgreSQL/Schema.hs b/src/Database/PostgreSQL/Schema.hs
--- a/src/Database/PostgreSQL/Schema.hs
+++ b/src/Database/PostgreSQL/Schema.hs
@@ -19,10 +19,11 @@
   , clear
   ) where
 
-import BasicPrelude               hiding (FilePath, (</>))
-import Data.Text                  (unpack)
-import Database.PostgreSQL.Simple
-import Shelly
+import           BasicPrelude               hiding (FilePath, (</>))
+import qualified Control.Exception          as E
+import           Data.Text                  (unpack)
+import           Database.PostgreSQL.Simple
+import           Shelly
 
 {-# ANN module ("HLint: ignore Use camelCase"::String) #-}
 
@@ -76,12 +77,12 @@
 
 query' :: (FromRow f, ToRow t) => Text -> t -> Text -> IO [f]
 query' q p url =
-  bracket (connectPostgreSQL (encodeUtf8 url)) close $ \c ->
+  E.bracket (connectPostgreSQL (encodeUtf8 url)) close $ \c ->
     query c (fromString $ unpack q) p
 
 execute_' :: Text -> Text -> IO ()
 execute_' q url =
-  bracket (connectPostgreSQL (encodeUtf8 url)) close $ \c ->
+  E.bracket (connectPostgreSQL (encodeUtf8 url)) close $ \c ->
     void $ execute_ c (fromString $ unpack q)
 
 countSchema :: Text -> Text -> IO [Only Int]