chore: Don't hard code the path seps in the build dir
parent
bd9ab34655
commit
d0714c3aab
|
@ -63,7 +63,7 @@ def sourceLinker : IO (Name → Option DeclarationRange → String) := do
|
||||||
|
|
||||||
def htmlOutput (result : AnalyzerResult) (root : String) : IO Unit := do
|
def htmlOutput (result : AnalyzerResult) (root : String) : IO Unit := do
|
||||||
let config := { root := root, result := result, currentName := none, sourceLinker := ←sourceLinker}
|
let config := { root := root, result := result, currentName := none, sourceLinker := ←sourceLinker}
|
||||||
let basePath := FilePath.mk "./build/doc/"
|
let basePath := FilePath.mk "." / "build" / "doc"
|
||||||
let indexHtml := ReaderT.run index config
|
let indexHtml := ReaderT.run index config
|
||||||
let notFoundHtml := ReaderT.run notFound config
|
let notFoundHtml := ReaderT.run notFound config
|
||||||
FS.createDirAll basePath
|
FS.createDirAll basePath
|
||||||
|
|
Loading…
Reference in New Issue