src/Timeout.hs: add export list to silence a GHC warning.

[haeredes.git] / src / Timeout.hs

diff --git a/src/Timeout.hs b/src/Timeout.hs
index 6f0f3d4d991417f56c409bbe6731c0580de81437..8184b3eae92f6339e87e9834277b0f6fe0b7b114 100644 (file)
--- a/src/Timeout.hs
+++ b/src/Timeout.hs
@@ -3,16 +3,15 @@
 -- | 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 Data.Typeable (Typeable)
+import System.Console.CmdArgs.Default (Default(def))
 
 newtype Timeout =
   Timeout { seconds :: Int }
-  deriving (Data, Show, Typeable)
+  deriving (Data, Show)
 
 instance Default Timeout where
   def = Timeout 15