git.iko.soy/typeable/reflex-dom-nested-routing
on master help sign in
Support latest reflex
8787828Ryan Trinkle
Reflex/Dom/Routing/Nested.hs+2
compare with master
unifiedsplit
@@ -114,6 +114,8 @@ instance (DomBuilder t m, MonadHold t m, MonadFix m) => DomBuilder t (RouteT t s
114 placeRawElement = lift . placeRawElement
114 placeRawElement = lift . placeRawElement
115 wrapRawElement e = lift . wrapRawElement e
115 wrapRawElement e = lift . wrapRawElement e
116
116
117+instance (Monad m, NotReady t m) => NotReady t (RouteT t segment m)
118+
117instance MonadReader r m => MonadReader r (RouteT t segment m) where
119instance MonadReader r m => MonadReader r (RouteT t segment m) where
118 ask = lift ask
120 ask = lift ask
119 local f (RouteT a) = RouteT $ mapReaderT (local f) a
121 local f (RouteT a) = RouteT $ mapReaderT (local f) a
Reflex/Dom/Routing/Writer.hs+2
@@ -91,6 +91,8 @@ instance (DomBuilder t m, MonadHold t m, MonadFix m) => DomBuilder t (RouteWrite
91 placeRawElement = lift . placeRawElement
91 placeRawElement = lift . placeRawElement
92 wrapRawElement e = lift . wrapRawElement e
92 wrapRawElement e = lift . wrapRawElement e
93
93
94+instance (Monad m, NotReady t m) => NotReady t (RouteWriterT t segment m)
95+
94deriving instance MonadReader r m => MonadReader r (RouteWriterT t segment m)
96deriving instance MonadReader r m => MonadReader r (RouteWriterT t segment m)
95
97
96instance RouteWriter t segment m => RouteWriter t segment (EventWriterT t w m) where
98instance RouteWriter t segment m => RouteWriter t segment (EventWriterT t w m) where