@@ -38,7 +38,7 @@ mkYesod "ElmTest" [parseRoutes|
3838-- so that toWidget can work with QuasiQuoted elm code. All URL interpolation
3939-- is done automatically. (e.g. lines 28-30 in elm_source/index.elm)
4040getMouseR :: Handler RepHtml
41−getMouseR =
41+getMouseR =
4242 defaultLayout $ do
4343 setTitle "Mouse position demo"
4444 toWidget mousePage
@@ -75,7 +75,7 @@ instance Yesod ElmTest where
7575 hamletToRepHtml $(hamletFile "templates/default-layout-wrapper.hamlet")
7676
7777instance YesodElm ElmTest where
78− urlElmJs _ = Right $ "https://raw.github.com/evancz/Elm/master/elm/elm-runtime-0.3.5.js"
78+ urlElmJs _ = Right $ "https://raw.github.com/evancz/Elm/master/elm/elm-runtime-0.7.2.js"
7979
8080main :: IO ()
8181main = warpDebug 3000 ElmTest