@@ -77,8 +77,7 @@ compileForRepl source maybeName =
7777
7878generateDocs :: Summary.Summary -> Task.Task Docs.Documentation
7979generateDocs summary@(Summary.Summary root project _ _ _) =
80− do Path.removeStuff root
81− args <- Args.fromSummary summary
80+ do args <- Args.fromSummary summary
8281 graph <- Crawl.crawl summary args
8382 (dirty, ifaces) <- Plan.plan summary graph
8483 answers <- Compile.compile project ifaces dirty