@@ -81,7 +81,7 @@ data ElConfig attrs = ElConfig
81makeLenses ''ElConfig
81makeLenses ''ElConfig
83--TODO: HasDocument is still not accounted for
83--TODO: HasDocument is still not accounted for
84−type MonadWidget t m =
84+type MonadWidgetConstraints t m =
85 ( DomBuilder t m
85 ( DomBuilder t m
86 , DomBuilderSpace m ~ GhcjsDomSpace
86 , DomBuilderSpace m ~ GhcjsDomSpace
87 , MonadFix m
87 , MonadFix m
@@ -103,6 +103,9 @@ type MonadWidget t m =
103 , Ref (Performable m) ~ Ref IO
103 , Ref (Performable m) ~ Ref IO
106+class MonadWidgetConstraints t m => MonadWidget t m
107+instance MonadWidgetConstraints t m => MonadWidget t m
106type WidgetHost m = Performable m
109type WidgetHost m = Performable m
108type El = Element EventResult GhcjsDomSpace
111type El = Element EventResult GhcjsDomSpace