Simple input signal loses focus after first character of input

[bbarker]

Here's an example:

locNameSig :: Maybe String -> Signal HTML (Maybe String)
locNameSig nameMay = step nameMay do
  newName <- D.div' [
    D.h3' [D.text "Institution Name"]
  , D.input [P.unsafeTargetValue <$> P.onChange]
  ]
  pure $ locNameSig $ if newName == "" then Nothing else Just newName

After entering a single character, focus is undesirably lost. Some google searches suggest this may be because the widget is being re-rendered, which makes sense, but why only on the first key press? Subsequent entries into the input field work as expected, and in in all cases the output is always emitted as hoped.

[bbarker]

Reference: redux-form/redux-form#1094

[bbarker]

I'm not sure what I changed, nothing in the code above, so it must have been external. But it seems working now, so I'll close this for now.