diff --git a/src/Dbapi.hs b/src/Dbapi.hs
index 26e22276a..c05d0872a 100644
--- a/src/Dbapi.hs
+++ b/src/Dbapi.hs
@@ -30,7 +30,6 @@ import qualified Data.ByteString.Char8 as BS
 import Data.String.Conversions (cs)
 import qualified Data.CaseInsensitive as CI
 
-import Database.HDBC.PostgreSQL (Connection)
 import PgStructure (printTables, printColumns, primaryKeyColumns,
                     columns, Column(colName))
 
diff --git a/src/Main.hs b/src/Main.hs
index 02a759497..2ae275da5 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -15,8 +15,6 @@ import Options.Applicative hiding (columns)
 import Network.Wai.Middleware.Gzip (gzip, def)
 import Network.Wai.Middleware.Cors (cors)
 import Network.Wai.Middleware.Static (staticPolicy, only)
-import Database.HDBC (disconnect)
-import Database.HDBC.PostgreSQL (connectPostgreSQL')
 import Data.Pool(createPool, destroyAllResources)
 import Data.List (intercalate)
 import Data.Version (versionBranch)
diff --git a/src/Middleware.hs b/src/Middleware.hs
index 55b04f836..533090eae 100644
--- a/src/Middleware.hs
+++ b/src/Middleware.hs
@@ -7,10 +7,6 @@ import Data.Maybe (fromMaybe)
 import Data.Monoid (mconcat)
 import Data.Pool(withResource, Pool)
 
-import Database.HDBC (runRaw)
-import Database.HDBC.PostgreSQL (Connection)
-import Database.HDBC.Types (SqlError(..))
-
 import Data.String.Conversions(cs)
 import qualified Data.ByteString.Char8 as BS
 import Control.Exception (finally, throw, catchJust, catch, SomeException,
diff --git a/src/Types.hs b/src/Types.hs
index 0ad9a72ab..350f022cf 100644
--- a/src/Types.hs
+++ b/src/Types.hs
@@ -1,8 +1,6 @@
 {-# OPTIONS_GHC -fno-warn-orphans #-}
 module Types where
 
-import Database.HDBC (toSql, iToSql, SqlValue(..))
-
 import qualified Data.Aeson as JSON
 import Data.Aeson.Types (Parser)