diff options
| author | Joris | 2019-08-05 21:53:30 +0200 |
|---|---|---|
| committer | Joris | 2019-08-05 21:53:30 +0200 |
| commit | bc81084933f8ec1bfe6c2834defd12243117fdd9 (patch) | |
| tree | 116d5e8ccd5f234d7376f4f14c74657d7c7e4792 /client/src/Component/Input.hs | |
| parent | 2741f47ef7b87255203bc2f7f7b2b9140c70b8f0 (diff) | |
| download | budget-bc81084933f8ec1bfe6c2834defd12243117fdd9.tar.gz budget-bc81084933f8ec1bfe6c2834defd12243117fdd9.tar.bz2 budget-bc81084933f8ec1bfe6c2834defd12243117fdd9.zip | |
Use updated payment categories from payment add in payment’s table
Diffstat (limited to 'client/src/Component/Input.hs')
| -rw-r--r-- | client/src/Component/Input.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/client/src/Component/Input.hs b/client/src/Component/Input.hs index 67f97c0..d679f9b 100644 --- a/client/src/Component/Input.hs +++ b/client/src/Component/Input.hs @@ -53,7 +53,7 @@ input input inputIn reset validate = do rec let resetValue = R.leftmost - [ R.traceEvent "reset" reset + [ reset , fmap (const "") resetClic ] @@ -83,7 +83,7 @@ input inputIn reset validate = do [ const (False, True) <$> resetClic , (\f -> (f, False)) <$> (R.updated . R._textInput_hasFocus $ textInput) , const (False, False) <$> validate - , const (True, False) <$> R.traceEvent "delayedReset" delayedReset + , const (True, False) <$> delayedReset ]) (textInput, resetClic) <- R.elDynAttr "div" containerAttr $ do |