Skip to content

P
purescript-gargantext
Commit 7ef5b893 authored by Przemyslaw Kaminski's avatar Przemyslaw Kaminski
Browse files
Options

[input text] no need for an onblur event 

This only annoys people.
parent 5d39a9ef
Hide whitespace changes
Inline Side-by-side
Showing with 2 additions and 4 deletions
src/Gargantext/Components/InputWithEnter.purs
View file @ 7ef5b893
module Gargantext.Components.InputWithEnter where module Gargantext.Components.InputWithEnter where
import Data.Tuple.Nested ((/\))
import DOM.Simple.Console (log2)
import Effect (Effect) import Effect (Effect)
import Reactix as R import Reactix as R
import Reactix.DOM.HTML as H import Reactix.DOM.HTML as H
...@@ -9,6 +7,7 @@ import Reactix.DOM.HTML as H ...@@ -9,6 +7,7 @@ import Reactix.DOM.HTML as H
import Gargantext.Prelude import Gargantext.Prelude
import Gargantext.Utils.Reactix as R2 import Gargantext.Utils.Reactix as R2
thisModule :: String
thisModule = "Gargantext.Components.InputWithEnter" thisModule = "Gargantext.Components.InputWithEnter"
type Props a = ( type Props a = (
...@@ -30,8 +29,7 @@ inputWithEnterCpt = R.hooksComponentWithModule thisModule "inputWithEnter" cpt ...@@ -30,8 +29,7 @@ inputWithEnterCpt = R.hooksComponentWithModule thisModule "inputWithEnter" cpt
where where
cpt props@{ onEnter, onValueChanged cpt props@{ onEnter, onValueChanged
, autoFocus, className, defaultValue, placeholder } _ = do , autoFocus, className, defaultValue, placeholder } _ = do
pure $ H.input { on: { blur: \_ -> onEnter unit pure $ H.input { on: { input: onInput
, input: onInput
, keyPress: onKeyPress } , keyPress: onKeyPress }
, autoFocus , autoFocus
, className , className
......
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