Merge pull request #17 from k0ral/master
Derive Eq, Ord and Show instances for Settings data type
This commit is contained in:
commit
48a2c8c1c3
@ -10,7 +10,7 @@ data Settings = Settings
|
|||||||
, sslMaxLineLength :: Int
|
, sslMaxLineLength :: Int
|
||||||
, sslLogToConsole :: Bool
|
, sslLogToConsole :: Bool
|
||||||
, sslDisableCertificateValidation :: Bool
|
, sslDisableCertificateValidation :: Bool
|
||||||
}
|
} deriving(Eq, Ord, Show)
|
||||||
|
|
||||||
defaultSettingsWithPort :: PortNumber -> Settings
|
defaultSettingsWithPort :: PortNumber -> Settings
|
||||||
defaultSettingsWithPort p = Settings
|
defaultSettingsWithPort p = Settings
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user