summaryrefslogtreecommitdiff
path: root/Biz/Que/Site.hs
diff options
context:
space:
mode:
authorBen Sima <ben@bsima.me>2024-12-04 15:52:52 -0500
committerBen Sima <ben@bsima.me>2024-12-21 10:08:05 -0500
commit81cf94523f5a794e5b0c69dbd9a94619135a23c7 (patch)
tree22544f9d741827ebfe65f73f0202b2b095a09cf8 /Biz/Que/Site.hs
parent47c48abf836f5918120c0550c57d4eda32d3f10e (diff)
Prune unused stuff
This was all dead weight, just delete it and move on.
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 =