Merge pull request #7 from AbrJA/rcpp

Bug fixing for replace_keys
AbrJA · Sep 29, 2023 · b0edb49 · b0edb49
2 parents 8b64e4a + a77d728
commit b0edb49
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/R/KeywordProcessor.R b/R/KeywordProcessor.R
@@ -177,6 +177,7 @@ KeywordProcessor <- R6::R6Class(
     replace_keys = function(sentences) {
       if (is.null(self$attrs$trie)) stop("Create a trie dictionary first")
       stopifnot(is.character(sentences), length(sentences) > 0)
+      if (self$attrs$ignore_case) sentences <- tolower(sentences)
       replaceKeys(self$attrs$trie, sentences, self$attrs$chars, self$attrs$id)
     }
     #-----------------------------------------------------------------