]> gitweb.michael.orlitzky.com - list-remote-forwards.git/commitdiff
src/Main.hs: fix some cosmetic import warnings.
authorMichael Orlitzky <michael@orlitzky.com>
Wed, 24 Aug 2022 12:16:44 +0000 (08:16 -0400)
committerMichael Orlitzky <michael@orlitzky.com>
Wed, 24 Aug 2022 12:16:44 +0000 (08:16 -0400)
src/Main.hs

index 088d86d4bde13f7bc1866abaaec79e0e0d9a1ab5..7a17f077f8ad375a2f365ce53bb1b510d39c5958 100644 (file)
@@ -4,9 +4,10 @@ module Main (main)
 where
 
 import Data.Maybe ( fromMaybe )
-import Data.Monoid ( (<>) )
 import Data.String.Utils ( join )
-import Database.HDBC ( SqlError(..), handleSql )
+import Database.HDBC (
+  SqlError(seNativeError, seErrorMsg),
+  handleSql )
 import Database.HDBC.PostgreSQL ( connectPostgreSQL )
 import Database.HDBC.Sqlite3 ( connectSqlite3 )
 import System.Console.CmdArgs ( def )
@@ -14,7 +15,9 @@ import System.Directory ( doesFileExist )
 import System.IO ( hPutStrLn, stderr )
 
 import CommandLine ( get_args )
-import Configuration ( Configuration(..), merge_optional )
+import Configuration (
+  Configuration(database, host, password, port, username),
+  merge_optional )
 import qualified OptionalConfiguration as OC ( from_rc )
 import Report ( report )
 import String ( trim )