Pattern match Windows correctly

ropensci · Oct 25, 2023 · 460669f · 460669f
1 parent bc68bd9
commit 460669f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/chrome.R b/R/chrome.R
@@ -104,7 +104,7 @@ chrome_check <- function(verbose, check = TRUE) {
   cyml[[platvec]] <-
     switch(Sys.info()["sysname"],
       Linux = grep(os_arch("linux"), cyml[[platvec]], value = TRUE),
-      Windows = grep("win", cyml[[platvec]], value = TRUE),
+      Windows = grep(os_arch("win"), cyml[[platvec]], value = TRUE),
       Darwin = grep(mac_machine(), cyml[[platvec]], value = TRUE),
       stop("Unknown OS")
     )