wiki <- wikifyPage env -< page
xs <- interpretCommandsA env -< (pageName page, (Just (page, wiki), wiki))
formatWikiBlocks -< (baseURI, xs)
wiki <- wikifyPage env -< page
xs <- interpretCommandsA env -< (pageName page, (Just (page, wiki), wiki))
formatWikiBlocks -< (baseURI, xs)