summaryrefslogtreecommitdiff
path: root/Que/Site.hs
diff options
context:
space:
mode:
authorBen Sima <ben@bsima.me>2020-10-26 17:52:56 -0400
committerBen Sima <ben@bsima.me>2020-10-26 17:52:56 -0400
commit19f5402bec9f6346463b83536cc22d7f4525bc18 (patch)
tree2076903999b67f26e1ada3a8717325710f6b2ee4 /Que/Site.hs
parente069bc069f998e3158c826e20f7d94575907ae46 (diff)
Capitalize rest of files
Diffstat (limited to 'Que/Site.hs')
-rw-r--r--Que/Site.hs16
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)