- , resGet = Just $ do setContentType $ read "text/plain"
- output "FIXME: not implemented"
+ , resGet
+ = Just $ do BaseURI baseURI ← getSysConf (envSysConf env)
+ DefaultPage name ← getSysConf (envSysConf env)
+ redirect Found (mkPageURI baseURI name)