diff options
Diffstat (limited to 'Que/Site.hs')
-rw-r--r-- | Que/Site.hs | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/Que/Site.hs b/Que/Site.hs index 2b35956..794dd04 100644 --- a/Que/Site.hs +++ b/Que/Site.hs @@ -39,14 +39,14 @@ main = do _ -> Exit.die "usage: que-website <srcdir> [namespace]" mKey <- getKey ns putText <| "serving " <> Text.pack src <> " at " <> ns - run mKey ns <| - Sources - { index = src </> "index.md", - client = src </> "client.py", - quescripts = src </> "quescripts.md", - style = src </> "style.css", - apidocs = src </> "apidocs.md", - tutorial = src </> "tutorial.md" + run mKey ns + <| Sources + { index = src </> "Index.md", + client = src </> "Client.py", + quescripts = src </> "Quescripts.md", + style = src </> "Style.css", + apidocs = src </> "Apidocs.md", + tutorial = src </> "Tutorial.md" } getKey :: Namespace -> IO (Maybe Key) |