Merge pull request #772 from kmicklas/route-classes-dynamicwritert
Add RouteToUrl and SetRoute instances for DynamicWriterT
commit4cf5c9b4d61cfa5955a5cf22184aa1a124497bce
authorElliot Cameron <3noch@users.noreply.github.com>
dateMon 29 Jun 2020, 15:32 (6 years ago)
parent9d2a7a8fbd6546
lib/route/src/Obelisk/Route/Frontend.hs+4
@@ -201,6 +201,10 @@ instance (Monad m, RouteToUrl r m) => RouteToUrl r (EventWriterT t w m)
201201
202202instance (Monad m, SetRoute t r m) => SetRoute t r (EventWriterT t w m)
203203
204+instance (Monad m, RouteToUrl r m) => RouteToUrl r (DynamicWriterT t w m)
205+
206+instance (Monad m, SetRoute t r m) => SetRoute t r (DynamicWriterT t w m)
207+
204208runRoutedT :: RoutedT t r m a -> Dynamic t r -> m a
205209runRoutedT = runReaderT . unRoutedT
206210