TheAnachronism/docspell
1
0
Fork 0
mirror of https://github.com/TheAnachronism/docspell.git synced 2025-06-23 02:48:26 +00:00
Code Issues Packages Projects Releases Wiki Activity

Add elm-analyse file and fix a few warnings

Browse Source
This commit is contained in:
Eike Kettner
2019-11-17 00:46:34 +01:00
parent f747c6146d
commit 852d292d9b
4 changed files with 10 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
modules/webapp/src/main/elm/Comp/ContactField.elm
View File

@ -31,13 +31,6 @@ emptyModel =
, value = ""
}
makeModel: List Contact -> Model
makeModel contacts =
let
em = emptyModel
in
{ em | items = contacts }
getContacts: Model -> List Contact
getContacts model =
List.filter (\c -> c.value /= "") model.items
@ -108,13 +101,13 @@ view model =
]
]
[div [class "ui vertical secondary fluid menu"]
(List.map (renderItem model) model.items)
(List.map renderItem model.items)
]
]
renderItem: Model -> Contact -> Html Msg
renderItem model contact =
renderItem: Contact -> Html Msg
renderItem contact =
div [class "link item", onClick (Select contact) ]
[i [class "delete icon"][]
,div [class "ui blue label"]