git.iko.soy/reflex-dom
on develop help sign in
Merge remote-tracking branch 'alisonwu1/textAreaElementHasSetValue' into release/0.6.1.0
commit074c20b08ced13eea04f4427d2fd297cf5c7fa2b authorAli Abrar <aliabrar@gmail.com> dateFri 6 Nov 2020, 10:11 (6 years ago) parentc6d4445b5e2c31
2 files changed+8−3
compare with develop
unifiedsplit
reflex-dom-core/src/Reflex/Dom/Builder/Class.hs+8 reflex-dom-core/src/Reflex/Dom/Widget/Input.hs−3
reflex-dom-core/src/Reflex/Dom/Builder/Class.hs+8
@@ -744,3 +744,11 @@ instance HasDocument m => HasDocument (DynamicWriterT t w m)
744744instance HasDocument m => HasDocument (PostBuildT t m)
745745instance HasDocument m => HasDocument (RequesterT t request response m)
746746instance HasDocument m => HasDocument (QueryT t q m)
747+
748+class HasSetValue a where
749+ type SetValue a :: *
750+ setValue :: Lens' a (SetValue a)
751+
752+instance Reflex t => HasSetValue (TextAreaElementConfig er t m) where
753+ type SetValue (TextAreaElementConfig er t m) = Event t Text
754+ setValue = textAreaElementConfig_setValue
reflex-dom-core/src/Reflex/Dom/Widget/Input.hs−3
@@ -629,9 +629,6 @@ instance HasAttributes (FileInputConfig t) where
629629 type Attrs (FileInputConfig t) = Dynamic t (Map Text Text)
630630 attributes = fileInputConfig_attributes
631631
632−class HasSetValue a where
633− type SetValue a :: *
634− setValue :: Lens' a (SetValue a)
635632
636633instance HasSetValue (TextAreaConfig t) where
637634 type SetValue (TextAreaConfig t) = Event t Text