@@ -201,6 +201,10 @@ instance (Monad m, RouteToUrl r m) => RouteToUrl r (EventWriterT t w m)
202instance (Monad m, SetRoute t r m) => SetRoute t r (EventWriterT t w m)
202instance (Monad m, SetRoute t r m) => SetRoute t r (EventWriterT t w m)
204+instance (Monad m, RouteToUrl r m) => RouteToUrl r (DynamicWriterT t w m)
206+instance (Monad m, SetRoute t r m) => SetRoute t r (DynamicWriterT t w m)
204runRoutedT :: RoutedT t r m a -> Dynamic t r -> m a
208runRoutedT :: RoutedT t r m a -> Dynamic t r -> m a
205runRoutedT = runReaderT . unRoutedT
209runRoutedT = runReaderT . unRoutedT