- = Just $ do BaseURI baseURI <- getSysConf (envSysConf env) (BaseURI undefined)
- DefaultPage name <- getSysConf (envSysConf env) (DefaultPage undefined)
+ = Just $ do BaseURI baseURI <- getSysConf (envSysConf env)
+ DefaultPage name <- getSysConf (envSysConf env)