@@ -327,7 +327,7 @@ instance SupportsImmediateDomBuilder t m => DomBuilder t (ImmediateDomBuilderT t
327 Select.setValue domSelectElement $ Just (cfg ^. selectElementConfig_initialValue)
327 Select.setValue domSelectElement $ Just (cfg ^. selectElementConfig_initialValue)
328 Just v0 <- Select.getValue domSelectElement
328 Just v0 <- Select.getValue domSelectElement
329 let getMyValue = fromMaybe "" <$> Select.getValue domSelectElement
329 let getMyValue = fromMaybe "" <$> Select.getValue domSelectElement
330− valueChangedByUI <- performEvent $ getMyValue <$ Reflex.select (_element_events e) (WrapArg Select)
330+ valueChangedByUI <- performEvent $ getMyValue <$ Reflex.select (_element_events e) (WrapArg Change)
331 valueChangedBySetValue <- performEvent $ ffor (cfg ^. selectElementConfig_setValue) $ \v' -> do
331 valueChangedBySetValue <- performEvent $ ffor (cfg ^. selectElementConfig_setValue) $ \v' -> do
332 Select.setValue domSelectElement $ Just v'
332 Select.setValue domSelectElement $ Just v'
333 getMyValue -- We get the value after setting it in case the browser has mucked with it somehow
333 getMyValue -- We get the value after setting it in case the browser has mucked with it somehow