X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;ds=sidebyside;f=src%2FOptionalConfiguration.hs;h=607659ea811ce200577ed1a04a645b86ae2a602b;hb=d7c6b5499c0969b6e488d9fc583f93bbb4e3d4c7;hp=0b5fd0a6b05cc0cd6ba5ee63a6cb3a5c342f0405;hpb=f519b55ffe72acd791bdc91b16918603afce1995;p=dead%2Fhalcyon.git diff --git a/src/OptionalConfiguration.hs b/src/OptionalConfiguration.hs index 0b5fd0a..607659e 100644 --- a/src/OptionalConfiguration.hs +++ b/src/OptionalConfiguration.hs @@ -11,18 +11,20 @@ module OptionalConfiguration ( OptionalCfg(..), - from_rc - ) + from_rc ) where -import qualified Data.Configurator as DC +import qualified Data.Configurator as DC ( + Worth (Optional), + load, + lookup ) -import Data.Data (Data) -import Data.Maybe (fromMaybe) -import Data.Monoid (Monoid(..)) -import Data.Typeable (Typeable) +import Data.Data ( Data ) +import Data.Maybe ( fromMaybe ) +import Data.Monoid ( Monoid(..) ) +import Data.Typeable ( Typeable ) -import Usernames +import Usernames ( Usernames(..) ) -- | The same as Cfg, except everything is optional. It's easy to