on develop help sign in
Remove unnecessary _|_ and commented code
3976bd2Tom Smalley
reflex-dom-core/src/Reflex/Dom/Builder/Hydration.hs+5−18
@@ -742,7 +742,7 @@ instance (SupportsHydrationDomBuilder t m) => DomBuilder t (HydrationDomBuilderT
742 , _inputElement_input = valueChangedByUI
742 , _inputElement_input = valueChangedByUI
743 , _inputElement_hasFocus = hasFocus
743 , _inputElement_hasFocus = hasFocus
744 , _inputElement_element = e
744 , _inputElement_element = e
745− , _inputElement_raw = undefined -- TODO domInputElement
745+ , _inputElement_raw = ()
746 , _inputElement_files = files
746 , _inputElement_files = files
747 }
747 }
748
748
@@ -799,7 +799,7 @@ instance (SupportsHydrationDomBuilder t m) => DomBuilder t (HydrationDomBuilderT
799 , _textAreaElement_input = valueChangedByUI
799 , _textAreaElement_input = valueChangedByUI
800 , _textAreaElement_hasFocus = hasFocus
800 , _textAreaElement_hasFocus = hasFocus
801 , _textAreaElement_element = e
801 , _textAreaElement_element = e
802− , _textAreaElement_raw = undefined -- TODO domTextAreaElement
802+ , _textAreaElement_raw = ()
803 }
803 }
804
804
805 {-# INLINABLE selectElement #-}
805 {-# INLINABLE selectElement #-}
@@ -855,24 +855,11 @@ instance (SupportsHydrationDomBuilder t m) => DomBuilder t (HydrationDomBuilderT
855 , _selectElement_change = valueChangedByUI
855 , _selectElement_change = valueChangedByUI
856 , _selectElement_hasFocus = hasFocus
856 , _selectElement_hasFocus = hasFocus
857 , _selectElement_element = e
857 , _selectElement_element = e
858− , _selectElement_raw = undefined -- TODO domSelectElement
858+ , _selectElement_raw = ()
859 }
859 }
860
860
861− placeRawElement () = pure () -- TODO
861+ placeRawElement () = pure ()
862−-- placeRawElement e = getHydrationMode >>= \case
863−-- HydrationMode_Immediate -> append $ toNode e
864−-- HydrationMode_Hydrating -> addHydrationStep $ insertAfterPreviousNode e
865− wrapRawElement () _cfg = pure $ Element (EventSelector $ const never) () -- TODO
862+ wrapRawElement () _cfg = pure $ Element (EventSelector $ const never) ()
866−-- wrapRawElement e rawCfg = do
867−-- ctx <- askJSM
868−-- events <- askEvents
869−-- let cfg = (def :: ElementConfig EventResult t HydrationDomSpace)
870−-- { _elementConfig_modifyAttributes = _rawElementConfig_modifyAttributes rawCfg
871−-- , _elementConfig_eventSpec = _rawElementConfig_eventSpec rawCfg
872−-- }
873−-- eventTriggerRefs <- wrap events e rawCfg
874−-- es <- newFanEventWithTrigger $ triggerBody ctx cfg events eventTriggerRefs e
875−-- return $ Element es e
876
863
877data FragmentState
864data FragmentState
878 = FragmentState_Unmounted
865 = FragmentState_Unmounted