add new color to highlighter on picking instead of updating existing …

…coloring, fix #419
graphsense · Jan 11, 2024 · 480f2e5 · 480f2e5
1 parent 036a83c
commit 480f2e5
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 21 deletions.
diff --git a/src/Update/Graph.elm b/src/Update/Graph.elm
@@ -1636,14 +1636,6 @@ updateByMsg plugins uc msg model =
                 , config =
                     model.config
                         |> s_highlighter (highlights.selected /= Nothing)
-                , layers =
-                    Highlighter.getSelectedColor model.highlights
-                        |> Maybe.map
-                            (\before ->
-                                Layer.updateEntityColor before (Just color) model.layers
-                                    |> Layer.updateAddressColor before (Just color)
-                            )
-                        |> Maybe.withDefault model.layers
             }
                 |> n
 

diff --git a/src/Update/Graph/Highlighter.elm b/src/Update/Graph/Highlighter.elm
@@ -8,19 +8,11 @@ import Tuple exposing (..)
 
 selectColor : Color -> Model -> Model
 selectColor color model =
-    case model.selected of
-        Nothing ->
-            { model
-                | highlights =
-                    ( "", color ) :: model.highlights
-                , selected = Just 0
-            }
-
-        Just i ->
-            { model
-                | highlights =
-                    List.Extra.updateAt i (mapSecond (always color)) model.highlights
-            }
+    { model
+        | highlights =
+            ( "", color ) :: model.highlights
+        , selected = Just 0
+    }
 
 
 removeHighlight : Int -> Model -> Model