git.iko.soy/obelisk
on master help sign in
Bump reflex-dom
commit41cd15b09d81e31848745255bdd4985e11da46d8 authorTom Smalley <tfsmalley@gmail.com> dateMon 14 Jan 2019, 15:03 (8 years ago) parent984a534
4 files changed+6−6
compare with master
unifiedsplit
dep/reflex-dom/github.json+2−2 dep/reflex-platform/github.json+2−2 lib/frontend/obelisk-frontend.cabal+1 lib/frontend/src/Obelisk/Frontend.hs+1−2
dep/reflex-dom/github.json+2−2
@@ -2,6 +2,6 @@
22 "owner": "reflex-frp",
33 "repo": "reflex-dom",
44 "branch": "ts-hydration",
5− "rev": "d5dbab23895c08a40d432e757de67d888e601e7b",
6− "sha256": "0zmd28svx6h4skaq6djaf1fwrv2x9ay8d105y0l1lilmylj9i2cz"
5+ "rev": "442f71205df76b2c58c516a6073fd094d202521d",
6+ "sha256": "0s1dx4n8fq02gm3x777fqxm71s3pbpzj0n67aynks48fjqf60ajq"
77}
dep/reflex-platform/github.json+2−2
@@ -2,6 +2,6 @@
22 "owner": "reflex-frp",
33 "repo": "reflex-platform",
44 "branch": "ts-hydration",
5− "rev": "38712bad0a170b11aba93bf9352b3b3837f3e691",
6− "sha256": "1pi6j8vm3nx7i1c0b3db4cxf2lhdlmz7kg3628kiihjvikmxc0vw"
5+ "rev": "6754d07fcf21d6ca4e3c1635e7c7685a8454f1ad",
6+ "sha256": "1i28qzm6bkvxpbdzbwlx7gwlz6qidhhg8nb13imz5f2qcfxqlzyb"
77}
lib/frontend/obelisk-frontend.cabal+1
@@ -11,6 +11,7 @@ library
1111 ghcjs-dom,
1212 jsaddle,
1313 lens,
14+ mtl,
1415 obelisk-route,
1516 primitive,
1617 ref-tf,
lib/frontend/src/Obelisk/Frontend.hs+1−2
@@ -45,7 +45,6 @@ import qualified GHCJS.DOM.Types as DOM
4545import Language.Javascript.JSaddle (JSM)
4646import Obelisk.Route.Frontend
4747import Reflex.Dom.Core
48−import Reflex.Dom.Builder.Hydration
4948import Reflex.Host.Class
5049import qualified Reflex.TriggerEvent.Base as TriggerEvent
5150
@@ -99,7 +98,7 @@ runFrontend validFullEncoder frontend = do
9998 -> RoutedT t (R route) (SetRouteT t (R route) (RouteToUrlT (R route) m)) a
10099 -> m a
101100 runMyRouteViewT = runRouteViewT ve
102− runHydrationWidgetWithHeadAndBody (liftIO $ putStrLn "SWITCHOVER") $ \appendHead appendBody -> do
101+ runHydrationWidgetWithHeadAndBody (pure ()) $ \appendHead appendBody -> do
103102 rec switchover <- runMyRouteViewT switchover $ do
104103 (switchover, fire) <- newTriggerEvent
105104 mapRoutedT (mapSetRouteT (mapRouteToUrlT appendHead)) $ do