[R] Use R's error stream for printing warnings (#9965)

2024-01-08 20:43:21 +01:00
parent b3eb5d0945
commit 7ff6d44efa
2 changed files with 7 additions and 2 deletions
--- a/R-package/tests/testthat/test_basic.R
+++ b/R-package/tests/testthat/test_basic.R
@@ -83,7 +83,8 @@ test_that("parameter validation works", {
      bar = "foo"
    )
    output <- capture.output(
-      xgb.train(params = params, data = dtrain, nrounds = nrounds)
+      xgb.train(params = params, data = dtrain, nrounds = nrounds),
+      type = "message"
    )
    print(output)
  }