fix test

h2oai · Feb 27, 2020 · 559fafa · 559fafa
1 parent 3dd9456
commit 559fafa
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 2 deletions.
diff --git a/h2o-r/h2o-package/R/frame.R b/h2o-r/h2o-package/R/frame.R
@@ -3273,7 +3273,7 @@ destination_frame.guess <- function(x) {
 #' @param use logical scalar, extra escape option, to be used as global option.
 #' @details
 #' We use this function to control csv read/write with optional \link[data.table]{data.table} package.
-#' Currently data.table is disabled by default, to enable it set \code{options("h2o.use.data.table"=TRUE)}.
+#' Currently data.table is enabled by default for some operations, to disable it set \code{options("h2o.use.data.table"=FALSE)}.
 #' It is possible to control just \code{\link[data.table]{fread}} or \code{\link[data.table]{fwrite}} with \code{options("h2o.fread"=FALSE, "h2o.fwrite"=FALSE)}.
 #' \code{h2o.fread} and \code{h2o.fwrite} options are not handled in this function but next to \emph{fread} and \emph{fwrite} calls.
 #' @export

diff --git a/h2o-r/tests/testdir_jira/runit_pubdev_2844.R b/h2o-r/tests/testdir_jira/runit_pubdev_2844.R
@@ -5,7 +5,9 @@ test.pubdev_2844 <- function() {
 
   df1 <- iris
   h2o.no_progress()
-
+  # enable using of data.table for as.data.frame
+  options(h2o.fread=TRUE)
+
   # as.h2o
   op <- options("datatable.verbose"=TRUE, "h2o.use.data.table"=TRUE)
   co <- capture.output(