import Control.Monad.Unicode
import qualified Data.ByteString.Lazy.Char8 as Lazy
import qualified Data.Collections as C
+import Data.Default
import Data.Time.Clock
import Network
import Network.HTTP.Lucu
SSL.contextSetCertificate ctx cert
SSL.contextSetDefaultCiphers ctx
- let config = defaultConfig {
+ let config = def {
cnfServerPort = "9000"
, cnfSSLConfig = Just SSLConfig {
sslServerPort = "9001"