X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=src%2FMxList.hs;h=10a9af6e7a8bbd6ba75d24d8e43e95290a242b75;hb=59b78070e1390a4cea14b4ba981f734e4da428f4;hp=d79307da86a42e459f9cf2ffa5f13449cefbfbc1;hpb=e3ef76e60ddd54e5fad787c5883533d2410b3e2a;p=list-remote-forwards.git

diff --git a/src/MxList.hs b/src/MxList.hs
index d79307d..10a9af6 100644
--- a/src/MxList.hs
+++ b/src/MxList.hs
@@ -5,7 +5,8 @@
 --   instance of Configured for [String] if we had defined one in
 --   e.g. 'OptionalConfiguration'.
 --
-module MxList
+module MxList (
+  MxList(..) )
 where
 
 -- DC is needed only for the DCT.Configured instance of String.
@@ -16,20 +17,21 @@ import qualified Data.Configurator.Types as DCT (
   convert )
 import Data.Data (Data)
 import System.Console.CmdArgs.Default (Default(..))
-import Data.Typeable (Typeable)
 
 
 -- | A (wrapper around a) list of MX hostnames.
 --
 newtype MxList =
   MxList { get_mxs :: [String] }
-    deriving (Data, Show, Typeable)
+    deriving (Data, Show)
 
 
 -- | The default (empty) list of MXes.
+--
 instance Default MxList where
   def = MxList []
 
+
 instance DCT.Configured MxList where
   -- | This allows us to read a MxList object out of a Configurator
   --   config file. By default Configurator wouldn't know what to do,