Add instance Default (ElConfig attrs)
commit8d203761ab4cbdb2060a48d980fbb6acbce21c5d
authorRyan Trinkle <ryan.trinkle@gmail.com>
dateTue 18 Oct 2016, 19:45 (10 years ago)
parent6897049
src/Reflex/Dom/Old.hs+6
@@ -80,6 +80,12 @@ data ElConfig attrs = ElConfig
8080 , _elConfig_attributes :: attrs
8181 }
8282
83+instance attrs ~ Map Text Text => Default (ElConfig attrs) where
84+ def = ElConfig
85+ { _elConfig_namespace = Nothing
86+ , _elConfig_attributes = mempty
87+ }
88+
8389makeLenses ''ElConfig
8490
8591--TODO: HasDocument is still not accounted for