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