Merge pull request #1675 from rstudio/fix/platform-detection-on-windows

Better handle silent errors
rstudio · Sep 23, 2024 · 4887f8c · 4887f8c
2 parents 8a38c9a + 6974279
commit 4887f8c
Showing 1 changed file with 5 additions and 3 deletions.
diff --git a/R/config.R b/R/config.R
@@ -375,9 +375,11 @@ py_discover_config <- function(required_module = NULL, use_environment = NULL) {
     # https://github.com/rstudio/reticulate/issues/1325
     get_platform <- function(python) {
       tryCatch({
-        system2(python,
-                args = c("-c", shQuote("import sys; print(sys.platform)")),
-                stdout = TRUE, stderr = FALSE)
+        plat <- system2(python,
+          args = c("-c", shQuote("import sys; print(sys.platform)")),
+          stdout = TRUE, stderr = FALSE
+        )
+        if (rlang::is_string(plat)) plat else ""
       }, warning = function(w) "", error = function(e) "")
     }
     python_sys_platforms <- vapply(python_versions, get_platform, "")