import Control.Monad.Unicode
import qualified Data.ByteString.Lazy.Char8 as Lazy
import qualified Data.Collections as C
+import Data.Default
import Data.Monoid.Unicode
import Network
import Network.HTTP.Lucu
import Prelude.Unicode
main ∷ IO ()
-main = let config = defaultConfig { cnfServerPort = "9999" }
+main = let config = def { cnfServerPort = "9999" }
mapper = resourceMap resources ⊕ resourceMap fallbacks
resources ∷ ResourceTree
resources = C.fromList