Commit b2fc2d2a authored by Alexandre Delanoë's avatar Alexandre Delanoë

Merge remote-tracking branch 'origin/674-dev-search-reload' into dev

parents fe0956c4 dee81710
......@@ -78,6 +78,7 @@ inputWithAutocompleteCpt = here.component "inputWithAutocomplete" cpt
, on: { focus: onFocus completions state'
, input: onInput completions
, change: onInput completions
, keyDown: onInputKeyDown inputRef
, keyUp: onInputKeyUp inputRef
, blur: onBlur completions containerRef
}
......@@ -140,7 +141,16 @@ inputWithAutocompleteCpt = here.component "inputWithAutocomplete" cpt
R2.blur input
pure false
else
pure $ false
pure false
onInputKeyDown :: R.Ref (Nullable DOM.Element) -> DE.KeyboardEvent -> Effect Boolean
onInputKeyDown _ e = do
if DE.key e == "Enter" then do
R2.preventDefault e
R2.stopPropagation e
pure false
else
pure false
---------------------------------------------------------
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment