| 1 | commit 20d80e2323b565a36751c9455e535d8f73fa32f7 |
| 2 | Author: Robert Vollmert <rob@vllmrt.net> |
| 3 | Date: Fri Jun 14 16:05:47 2019 +0200 |
| 4 | |
| 5 | disable reactor |
| 6 | |
| 7 | diff --git a/elm.cabal b/elm.cabal |
| 8 | index c75f9689..ece63c46 100644 |
| 9 | --- a/elm.cabal |
| 10 | +++ b/elm.cabal |
| 11 | @@ -45,9 +45,6 @@ Executable elm |
| 12 | builder/src |
| 13 | ui/terminal/src |
| 14 | |
| 15 | - other-extensions: |
| 16 | - TemplateHaskell |
| 17 | - |
| 18 | Main-Is: |
| 19 | Main.hs |
| 20 | |
| 21 | @@ -56,8 +53,6 @@ Executable elm |
| 22 | Develop |
| 23 | Develop.Generate.Help |
| 24 | Develop.Generate.Index |
| 25 | - Develop.StaticFiles |
| 26 | - Develop.StaticFiles.Build |
| 27 | Diff |
| 28 | Init |
| 29 | Install |
| 30 | diff --git a/ui/terminal/src/Develop.hs b/ui/terminal/src/Develop.hs |
| 31 | index 4b2252e1..7ed7716e 100644 |
| 32 | --- a/ui/terminal/src/Develop.hs |
| 33 | +++ b/ui/terminal/src/Develop.hs |
| 34 | @@ -23,7 +23,6 @@ import Snap.Util.FileServe |
| 35 | import qualified Elm.Project as Project |
| 36 | import qualified Develop.Generate.Help as Generate |
| 37 | import qualified Develop.Generate.Index as Index |
| 38 | -import qualified Develop.StaticFiles as StaticFiles |
| 39 | import qualified Generate.Output as Output |
| 40 | import qualified Json.Encode as Encode |
| 41 | import qualified Reporting.Exit as Exit |
| 42 | @@ -219,16 +218,7 @@ compileToHtmlBuilder mode file = |
| 43 | |
| 44 | |
| 45 | serveAssets :: Snap () |
| 46 | -serveAssets = |
| 47 | - do file <- getSafePath |
| 48 | - case StaticFiles.lookup file of |
| 49 | - Nothing -> |
| 50 | - pass |
| 51 | - |
| 52 | - Just (content, mimeType) -> |
| 53 | - do modifyResponse (setContentType (mimeType <> ";charset=utf-8")) |
| 54 | - writeBS content |
| 55 | - |
| 56 | +serveAssets = pass |
| 57 | |
| 58 | |
| 59 | -- MIME TYPES |
| 60 | diff --git a/ui/terminal/src/Main.hs b/terminal/src/Main.hs |
| 61 | index 7000f3ca..2c76965a 100644 |
| 62 | --- a/ui/terminal/src/Main.hs |
| 63 | +++ b/ui/terminal/src/Main.hs |
| 64 | @@ -39,7 +39,6 @@ main = |
| 65 | complex intro outro |
| 66 | [ repl |
| 67 | , init |
| 68 | - , reactor |
| 69 | , make |
| 70 | , install |
| 71 | , bump |