diff options
author | Ben Sima <ben@bsima.me> | 2020-10-26 17:52:56 -0400 |
---|---|---|
committer | Ben Sima <ben@bsima.me> | 2020-10-26 17:52:56 -0400 |
commit | 19f5402bec9f6346463b83536cc22d7f4525bc18 (patch) | |
tree | 2076903999b67f26e1ada3a8717325710f6b2ee4 /Que/Site.hs | |
parent | e069bc069f998e3158c826e20f7d94575907ae46 (diff) |
Capitalize rest of files
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) |