@@ -254,6 +254,10 @@ instance HasJS x m => HasJS x (DynamicWriterT t w m) where
254 type JSX (DynamicWriterT t w m) = JSX m
254 type JSX (DynamicWriterT t w m) = JSX m
255 liftJS = lift . liftJS
255 liftJS = lift . liftJS
257+instance HasJS x m => HasJS x (EventWriterT t w m) where
258+ type JSX (EventWriterT t w m) = JSX m
259+ liftJS = lift . liftJS
257instance HasJS x m => HasJS x (RequesterT t request response m) where
261instance HasJS x m => HasJS x (RequesterT t request response m) where
258 type JSX (RequesterT t request response m) = JSX m
262 type JSX (RequesterT t request response m) = JSX m
259 liftJS = lift . liftJS
263 liftJS = lift . liftJS