load,
lookup )
import Data.Data ( Data )
-import Data.Typeable ( Typeable )
import Data.Monoid ( Monoid() )
import Data.Semigroup ( Semigroup() )
import Paths_mailbox_count ( getSysconfDir )
port :: Maybe Int,
summary_query :: Maybe String,
username :: Maybe String }
- deriving (Show, Data, Typeable)
+ deriving (Show, Data)
-- | Combine two Maybes into one, essentially mashing them