diff options
| author | Joris | 2019-11-25 08:17:59 +0100 |
|---|---|---|
| committer | Joris | 2019-11-25 08:17:59 +0100 |
| commit | e622e8fdd2e40b4306b5cc724d8dfb76bf976242 (patch) | |
| tree | ea679b1f701631c37601a1305b8df90e40cdc56e /client/src/View/Income/Income.hs | |
| parent | 54628c70cb33de5e4309c35b9f6b57bbe9f7a07b (diff) | |
| download | budget-e622e8fdd2e40b4306b5cc724d8dfb76bf976242.tar.gz budget-e622e8fdd2e40b4306b5cc724d8dfb76bf976242.tar.bz2 budget-e622e8fdd2e40b4306b5cc724d8dfb76bf976242.zip | |
Remove Loadable2
Diffstat (limited to 'client/src/View/Income/Income.hs')
| -rw-r--r-- | client/src/View/Income/Income.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/client/src/View/Income/Income.hs b/client/src/View/Income/Income.hs index fa2585d..e83ba80 100644 --- a/client/src/View/Income/Income.hs +++ b/client/src/View/Income/Income.hs @@ -50,7 +50,7 @@ view input = do editIncome <- eventFromResult $ Table._out_edit . (\(_, b, _) -> b) deleteIncome <- eventFromResult $ Table._out_delete . (\(_, b, _) -> b) - result <- Loadable.view2 incomePage $ + result <- Loadable.viewShowValueWhileLoading incomePage $ \(IncomePage page header incomes count) -> do header <- Header.view $ Header.In { Header._in_users = _in_users input |