[FIX] Patch Scores: Nothing Nothing case

fd3df0e9 · Alexandre Delanoë · 11163872 · fd3df0e9
Commit fd3df0e9 authored Dec 13, 2020 by Alexandre Delanoë
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 2 deletions

Patch.hs src/Gargantext/Core/Text/List/Social/Patch.hs +2 -2

No files found.
--- a/src/Gargantext/Core/Text/List/Social/Patch.hs
+++ b/src/Gargantext/Core/Text/List/Social/Patch.hs
@@ -83,8 +83,8 @@ addScorePatch fl (NgramsTerm p, NgramsPatch children' Patch.Keep) =
      -- | Removing a child
      add' fl' (NgramsTerm t, Patch.Replace (Just _) Nothing) = doLink (-1) p t fl'

-      -- | Maybe TODO
-      add' _ _ = panic "[G.C.T.L.S.P.addScorePatch] This case should not happen"
+      -- | This case should not happen: does Nothing
+      add' fl' _ = fl'

 -- | Inserting a new Ngrams
 addScorePatch fl (NgramsTerm t, NgramsReplace Nothing (Just nre)) =