module Gargantext.Components.Annotation.Utils where import Gargantext.Types ( TermList(..) ) termClass :: TermList -> String termClass MapTerm = "graph-term" termClass StopTerm = "stop-term" termClass CandidateTerm = "candidate-term" termBootstrapClass :: TermList -> String termBootstrapClass MapTerm = "success" termBootstrapClass StopTerm = "danger" termBootstrapClass CandidateTerm = "warning"