diff options
| author | Joris | 2019-11-06 19:44:15 +0100 |
|---|---|---|
| committer | Joris | 2019-11-06 19:44:15 +0100 |
| commit | f4f24158a46d8c0975f1b8813bbdbbeebad8c108 (patch) | |
| tree | d0aeaa3a920caaff7408a1f6cd12b45f21cb2620 /client/src/Component/Modal.hs | |
| parent | 58f6c4e25f5f20f1b608242c83786e2f13947804 (diff) | |
| download | budget-f4f24158a46d8c0975f1b8813bbdbbeebad8c108.tar.gz budget-f4f24158a46d8c0975f1b8813bbdbbeebad8c108.tar.bz2 budget-f4f24158a46d8c0975f1b8813bbdbbeebad8c108.zip | |
Show the payment table with server side paging
Diffstat (limited to 'client/src/Component/Modal.hs')
| -rw-r--r-- | client/src/Component/Modal.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/client/src/Component/Modal.hs b/client/src/Component/Modal.hs index b0533e2..08f2e74 100644 --- a/client/src/Component/Modal.hs +++ b/client/src/Component/Modal.hs @@ -72,7 +72,7 @@ view input = do let content = R.switchDyn $ (\(_, _, c) -> c) <$> dyn -- Delay the event in order to let time for the modal to disappear - R.delay (0.3 :: NominalDiffTime) content + R.delay (0.5 :: NominalDiffTime) content getAttributes :: Text -> LM.Map Text Text getAttributes modalClass = |