diff --git a/src/Unused/CLI/SearchResult.hs b/src/Unused/CLI/SearchResult.hs index 94cc94b..8732e6f 100644 --- a/src/Unused/CLI/SearchResult.hs +++ b/src/Unused/CLI/SearchResult.hs @@ -44,6 +44,7 @@ likelihoodColor :: RemovalLikelihood -> Color likelihoodColor High = Red likelihoodColor Medium = Yellow likelihoodColor Low = Green +likelihoodColor Unknown = Black printMatches :: Int -> TermResults -> [TermMatch] -> IO () printMatches w r ms =