makes filter search case insensitive
This commit is contained in:
@@ -111,7 +111,7 @@ view : Chest -> Loot -> Html Msg
|
|||||||
view model loot =
|
view model loot =
|
||||||
let
|
let
|
||||||
filterLoot txt ls =
|
filterLoot txt ls =
|
||||||
List.filter (\i -> String.contains txt i.name) ls
|
List.filter (\i -> String.contains (String.toLower txt) (String.toLower i.name)) ls
|
||||||
in
|
in
|
||||||
case model of
|
case model of
|
||||||
View filterText renderItem ->
|
View filterText renderItem ->
|
||||||
|
|||||||
@@ -16,8 +16,7 @@ type alias ItemRenderer a msg =
|
|||||||
view : RowRenderer a msg -> List a -> Html msg
|
view : RowRenderer a msg -> List a -> Html msg
|
||||||
view rowRenderer content =
|
view rowRenderer content =
|
||||||
table [ class "table is-fullwidth" ]
|
table [ class "table is-fullwidth" ]
|
||||||
[ thead [ class "table-header" ]
|
[ thead [] [ th [] [ text "Nom" ] ]
|
||||||
[ th [] [ text "Nom" ] ]
|
|
||||||
, tbody [] <|
|
, tbody [] <|
|
||||||
List.map
|
List.map
|
||||||
rowRenderer
|
rowRenderer
|
||||||
|
|||||||
Reference in New Issue
Block a user