aboutsummaryrefslogtreecommitdiff
path: root/src/client/elm/LoggedIn/Home/Update.elm
diff options
context:
space:
mode:
authorJoris2016-06-19 01:00:53 +0200
committerJoris2016-06-19 01:00:53 +0200
commitfb5629d7f705b7e80dcf1852da58d2864c2b0d25 (patch)
treee9e0d0db119b6f7c2b240226f03ff2d6218070ed /src/client/elm/LoggedIn/Home/Update.elm
parent9716f77d14ef43f96a1534d97bb9d336df1882be (diff)
downloadbudget-fb5629d7f705b7e80dcf1852da58d2864c2b0d25.tar.gz
budget-fb5629d7f705b7e80dcf1852da58d2864c2b0d25.tar.bz2
budget-fb5629d7f705b7e80dcf1852da58d2864c2b0d25.zip
Show payment count and sum right after search
Diffstat (limited to 'src/client/elm/LoggedIn/Home/Update.elm')
-rw-r--r--src/client/elm/LoggedIn/Home/Update.elm5
1 files changed, 4 insertions, 1 deletions
diff --git a/src/client/elm/LoggedIn/Home/Update.elm b/src/client/elm/LoggedIn/Home/Update.elm
index 302509f..078036d 100644
--- a/src/client/elm/LoggedIn/Home/Update.elm
+++ b/src/client/elm/LoggedIn/Home/Update.elm
@@ -45,7 +45,10 @@ update loggedData action homeModel =
HomeMsg.SearchMsg formMsg ->
( { homeModel
| search = Form.update formMsg homeModel.search
- , currentPage = 1
+ , currentPage =
+ case formMsg of
+ Form.Input "searchText" _ -> 1
+ _ -> homeModel.currentPage
}
, Cmd.none
)