X-Git-Url: https://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=src%2FMxList.hs;h=e31e7f4be8ab655dcecfbc7052948a2b7497ed62;hb=749f5cf383337c96beb5255031dd081961508fe5;hp=d79307da86a42e459f9cf2ffa5f13449cefbfbc1;hpb=e3ef76e60ddd54e5fad787c5883533d2410b3e2a;p=list-remote-forwards.git diff --git a/src/MxList.hs b/src/MxList.hs index d79307d..e31e7f4 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. @@ -27,9 +28,11 @@ newtype MxList = -- | 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,