Point to the new directory names

This commit is contained in:
Evan Czaplicki 2018-11-13 17:18:15 -05:00
parent 1c91efdc45
commit 76e90792bc
2 changed files with 3 additions and 3 deletions

View File

@ -43,7 +43,7 @@ Executable elm
Hs-Source-Dirs:
compiler/src
builder/src
ui/terminal/src
terminal/src
other-extensions:
TemplateHaskell

View File

@ -22,7 +22,7 @@ import qualified Reporting.Progress.Terminal as Terminal
readAsset :: FilePath -> IO BS.ByteString
readAsset path =
BS.readFile ("ui" </> "browser" </> "assets" </> path)
BS.readFile ("reactor" </> "assets" </> path)
@ -31,7 +31,7 @@ readAsset path =
compile :: IO BS.ByteString
compile =
Dir.withCurrentDirectory ("ui" </> "browser") $
Dir.withCurrentDirectory "reactor" $
do reporter <- Terminal.create
Task.run reporter $
do summary <- Project.getRoot