summaryrefslogtreecommitdiff
path: root/Biz/Que/Site.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Biz/Que/Site.hs')
-rw-r--r--Biz/Que/Site.hs7
1 files changed, 2 insertions, 5 deletions
diff --git a/Biz/Que/Site.hs b/Biz/Que/Site.hs
index 963927d..f4e4a9c 100644
--- a/Biz/Que/Site.hs
+++ b/Biz/Que/Site.hs
@@ -42,7 +42,6 @@ move args = do
client = src </> "Client.py",
quescripts = src </> "Quescripts.md",
style = src </> "Style.css",
- apidocs = src </> "Apidocs.md",
tutorial = src </> "Tutorial.md"
}
where
@@ -82,8 +81,7 @@ data Sources = Sources
quescripts :: FilePath,
client :: FilePath,
style :: FilePath,
- tutorial :: FilePath,
- apidocs :: FilePath
+ tutorial :: FilePath
}
type Namespace = Text
@@ -103,8 +101,7 @@ run key ns Sources {..} = Async.runConcurrently actions |> void
[ toHtml index +> serve key ns "index" |> forever,
toHtml quescripts +> serve key ns "quescripts" |> forever,
BS.readFile client +> serve key ns "client" |> forever,
- toHtml tutorial +> serve key ns "tutorial" |> forever,
- toHtml apidocs +> serve key ns "apidocs" |> forever
+ toHtml tutorial +> serve key ns "tutorial" |> forever
]
toHtml :: FilePath -> IO ByteString
toHtml md =