fromConfPath :: FilePath -> FilePath
-fromConfPath = combine "/config"
+fromConfPath = ("/config" </>)
serializeStringPairs :: [(String, String)] -> String
PortNumber num -> fromIntegral num
defaultURI
- = "http://" ++ host ++
+ = "http://" ++ host ++ -- FIXME: consider IPv6 address
(if port == 80
then ""
else ':' : show port) ++ "/"