X-Git-Url: http://gitweb.michael.orlitzky.com/?p=list-remote-forwards.git;a=blobdiff_plain;f=src%2FReport.hs;fp=src%2FReport.hs;h=96a3e3b1a3c05cbf0d011c1eaba466906e2ed901;hp=82dd07bc8750944fc9e2f8c526005d4f3e9f69a3;hb=1cda745aadadc29c5af77f656fe0fde773ad118e;hpb=2f8e81e4a5d221d066b905f264cd24786816c8bd

diff --git a/src/Report.hs b/src/Report.hs
index 82dd07b..96a3e3b 100644
--- a/src/Report.hs
+++ b/src/Report.hs
@@ -15,18 +15,20 @@ import Database.HDBC (
   prepare,
   sFetchAllRows')
 import Database.HDBC.Sqlite3 ( connectSqlite3 )
-import System.Console.CmdArgs.Default ( Default(..) )
+import System.Console.CmdArgs.Default ( Default( def ) )
 import Test.Tasty ( TestTree, testGroup )
 import Test.Tasty.HUnit ( (@?=), testCase )
 
-import Configuration ( Configuration(..) )
+import Configuration ( Configuration( domain_query,
+                                      exclude_mx,
+                                      forward_query) )
 import DNS (
   MxSetMap,
   NormalDomain,
   mx_set_map,
   normalize_string )
 import Forward (
-  Forward(..),
+  Forward( Forward ),
   address_domain,
   dropby_goto_domains,
   fwd,