From cbe50a79a77b810a73db5f2b1165c4b211fd995b Mon Sep 17 00:00:00 2001 From: Pelle Bjerkestrand Date: Thu, 16 Feb 2017 17:18:42 +0100 Subject: [PATCH] adds unlimited colors --- src/Palette.elm | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/src/Palette.elm b/src/Palette.elm index 8403428..e4c7a1e 100644 --- a/src/Palette.elm +++ b/src/Palette.elm @@ -30,8 +30,6 @@ type PaletteMsg = | Remove Int | Add -maxPaletteEntries = 6 - updatePalette : PaletteMsg -> Palette -> Palette updatePalette msg palette = case msg of @@ -74,7 +72,7 @@ deserializePalette items = , color = safeHexToColor hex , editableColor = filterHex hex } in - List.take maxPaletteEntries items + items |> List.indexedMap entry serializePalette : Palette -> SerializedPalette @@ -190,7 +188,7 @@ paletteUl palette isEditable = addActions : List (Html PaletteMsg) addActions = - if isEditable && List.length palette < maxPaletteEntries then + if isEditable then [ li [ class "usa-color-square palette-action-add-wrapper" ] [ button [ class "usa-button-outline" , ariaLabel "Add a new color"