diff options
| author | Joris | 2017-03-26 23:16:28 +0200 |
|---|---|---|
| committer | Joris | 2017-03-27 00:17:41 +0200 |
| commit | 902acfbdbcc1d59941399753e887479e586e2748 (patch) | |
| tree | 0ad90ead3f8bdf0ea7c94462d1577c8e188df469 /src/client/Dialog/AddCategory/View.elm | |
| parent | 8062f1c9c34e9b25d76b22bd6ba2a1a99666279b (diff) | |
| download | budget-902acfbdbcc1d59941399753e887479e586e2748.tar.gz budget-902acfbdbcc1d59941399753e887479e586e2748.tar.bz2 budget-902acfbdbcc1d59941399753e887479e586e2748.zip | |
Improve form validation
- Trim names
- Income amount accepted from 0
- Validate colors
Diffstat (limited to 'src/client/Dialog/AddCategory/View.elm')
| -rw-r--r-- | src/client/Dialog/AddCategory/View.elm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/client/Dialog/AddCategory/View.elm b/src/client/Dialog/AddCategory/View.elm index 6c02351..dc55b60 100644 --- a/src/client/Dialog/AddCategory/View.elm +++ b/src/client/Dialog/AddCategory/View.elm @@ -45,7 +45,7 @@ button loggedData initialForm title buttonContent tooltip = Just message -> Tooltip.show Msg.Tooltip message Nothing -> [] ) - ++ [ onClick (Msg.Dialog <| Dialog.OpenWithUpdate dialogConfig (DialogMsg.Init "categoryname" (DialogMsg.AddCategoryMsg <| Form.Reset initialForm))) ] + ++ [ onClick (Msg.Dialog <| Dialog.OpenWithUpdate dialogConfig (DialogMsg.Init "categoryname" (DialogMsg.AddCategoryMsg (Form.Reset initialForm)))) ] ) [ buttonContent ] @@ -65,8 +65,8 @@ submitForm addCategory = Just data -> case data.id of Just categoryId -> - Msg.Dialog <| Dialog.UpdateAndClose <| Msg.EditCategory categoryId data.name data.color + Msg.Dialog <| Dialog.UpdateAndClose <| Msg.EditCategory categoryId (String.trim data.name) data.color Nothing -> - Msg.Dialog <| Dialog.UpdateAndClose <| Msg.CreateCategory data.name data.color + Msg.Dialog <| Dialog.UpdateAndClose <| Msg.CreateCategory (String.trim data.name) data.color Nothing -> Msg.Dialog <| Dialog.Update <| DialogMsg.AddCategoryMsg <| Form.Submit |