@@ -1,4 +1,3 @@
1−{-# OPTIONS_GHC -Wall #-}
21{-# LANGUAGE OverloadedStrings #-}
32module Develop.StaticFiles.Build
43 ( readAsset
@@ -34,7 +33,6 @@ readAsset path =
3433
3534compile :: IO BS.ByteString
3635compile =
37− if True then return "TODO" else
3836 Dir.withCurrentDirectory ("ui" </> "browser") $
3937 do reporter <- Terminal.create
4038 void $ Task.run reporter $
@@ -61,6 +59,5 @@ rootPaths :: [FilePath]
6159rootPaths =
6260 [ "src" </> "Errors.elm"
6361 , "src" </> "Index.elm"
64− , "src" </> "Start.elm"
6562 , "src" </> "NotFound.elm"
6663 ]