diff --git a/R/check_homogeneity.R b/R/check_homogeneity.R
index 0948865e6..ca724d46c 100644
--- a/R/check_homogeneity.R
+++ b/R/check_homogeneity.R
@@ -90,9 +90,9 @@ check_homogeneity.default <- function(x, method = c("bartlett", "fligner", "leve
 
 
   method.string <- switch(method,
-    "bartlett" = "Bartlett Test",
-    "fligner" = "Fligner-Killeen Test",
-    "levene" = "Levene's Test"
+    bartlett = "Bartlett Test",
+    fligner = "Fligner-Killeen Test",
+    levene = "Levene's Test"
   )
 
   attr(p.val, "data") <- x