@@ -638,7 +638,7 @@ instance (DomBuilder t m, MonadFix m, MonadHold t m, Group q, Query q, Additive
639-- * Convenience functions
639-- * Convenience functions
641−class HasDomEvent t target eventName where
641+class HasDomEvent t target eventName | target -> t where
642 type DomEventType target eventName :: *
642 type DomEventType target eventName :: *
643 domEvent :: EventName eventName -> target -> Event t (DomEventType target eventName)
643 domEvent :: EventName eventName -> target -> Event t (DomEventType target eventName)