diff --git a/R/utils.R b/R/utils.R index a43a5ad..946b5a2 100644 --- a/R/utils.R +++ b/R/utils.R @@ -161,7 +161,7 @@ JSEvals <- function(list) { #' @noRd #' @keywords internal shouldEval <- function(options) { - if (inherits(options, c("list", "data.frame"))) { + if (is.list(options)) { if ((n <- length(options)) == 0) return(FALSE) # use numeric indices as names (remember JS indexes from 0, hence -1 here) if (is.null(names(options)))