diff --git a/inst/tinytest/test_MiniMaxApprox.R b/inst/tinytest/test_MiniMaxApprox.R
index aa40f7c..5e41553 100644
--- a/inst/tinytest/test_MiniMaxApprox.R
+++ b/inst/tinytest/test_MiniMaxApprox.R
@@ -141,7 +141,7 @@ expect_warning(minimaxApprox(sin, 0, pi / 4, c(1L, 1L), TRUE), wrnMess)
 ## servers do not get the Zero basis error. Probably BLAS related, so I will
 ## only run this at home.
 xi <- c(-pi, -2.85, -2.07, -pi / 2, -0.77, -0.2, 0)
-if ("windows" %in% tolower(Sys.info()[["sysname"]])) {
+if (Sys.info()["nodename"] == "HOME") {
   expect_warning(minimaxApprox(fn, -pi, 0, c(1, 4), TRUE, xi = xi), wrnMess)
 }