diff --git a/R/utils.R b/R/utils.R
index d7ecad29..b1fbea6f 100644
--- a/R/utils.R
+++ b/R/utils.R
@@ -14,7 +14,7 @@ JS <- function (...)
     if (is.null(x))
         return()
     if (!is.character(x))
-        stop("The arguments for JS() must be a chraracter vector")
+        stop("The arguments for JS() must be a character vector")
     x <- paste(x, collapse = "\n")
     structure(x, class = unique(c("JS_EVAL", oldClass(x))))
 }