X-Git-Url: http://gitweb.michael.orlitzky.com/?p=haeredes.git;a=blobdiff_plain;f=src%2FTimeout.hs;h=8184b3eae92f6339e87e9834277b0f6fe0b7b114;hp=0b0f2e12798d507737cdcf203c33c9957b2e4855;hb=6fe16dcca81b5980ccd37e7961f438dd6c4844ed;hpb=8a80ed0a84261013ff81bc147713e066585749ff

diff --git a/src/Timeout.hs b/src/Timeout.hs
index 0b0f2e1..8184b3e 100644
--- a/src/Timeout.hs
+++ b/src/Timeout.hs
@@ -3,11 +3,11 @@
 -- | A newtype around the DNS query timeout, in seconds. Needed for
 --   the 'Default' instance.
 --
-module Timeout
+module Timeout (Timeout(..))
 where
 
 import Data.Data (Data)
-import System.Console.CmdArgs.Default (Default(..))
+import System.Console.CmdArgs.Default (Default(def))
 
 newtype Timeout =
   Timeout { seconds :: Int }