diff --git a/inst/tests/mergelist.Rraw b/inst/tests/mergelist.Rraw index 385e1ae94..9e6835cb7 100644 --- a/inst/tests/mergelist.Rraw +++ b/inst/tests/mergelist.Rraw @@ -32,9 +32,7 @@ test(12.01, cbindlist(data.frame(a=1L), data.frame(b=1L)), error="must be a list test(12.02, cbindlist(TRUE, FALSE), error="must be a list") test(12.03, cbindlist(list(), NA), error="must be TRUE or FALSE") test(12.04, cbindlist(list(data.table(a=1L), 1L)), error="is not of data.table type") -op = options(datatable.verbose=TRUE) -test(12.05, cbindlist(list(data.table(a=1:2), data.table(b=1:2))), data.table(a=1:2, b=1:2), output="cbindlist.*took") -options(op) +test(12.05, options = c(datatable.verbose=TRUE), cbindlist(list(data.table(a=1:2), data.table(b=1:2))), data.table(a=1:2, b=1:2), output="cbindlist.*took") test(12.06, cbindlist(list(data.table(), data.table(a=1:2), data.table(b=1:2))), data.table(a=1:2, b=1:2)) test(12.07, cbindlist(list(data.table(), data.table(a=1:2), list(b=1:2))), data.table(a=1:2, b=1:2)) test(12.08, cbindlist(list(data.table(a=integer()), list(b=integer()))), data.table(a=integer(), b=integer()))