Merge branch 'main' of https://github.com/JessUWE/ACRO-R

Author: JessUWE

tests/testthat/test-create_virtualenv.R

@@ -21,3 +21,25 @@ test_that("create_virtualenv function exists and is callable", {
 
   expect_true(is.function(create_virtualenv))
 })
+
+test_that("install_acro stops when python not found", {
+  # Mock Sys.which to return empty string (simulates Python not installed)
+  with_mock(
+    `base::Sys.which` = function(x) "",
+    expect_error(
+      install_acro(envname = "test-env", python = NULL),
+      "Python not found in PATH"
+    )
+  )
+})
+
+test_that("create_virtualenv stops when python not found", {
+  # Mock Sys.which to return empty string
+  with_mock(
+    `base::Sys.which` = function(x) "",
+    expect_error(
+      create_virtualenv(),
+      "Python not found in PATH"
+    )
+  )
+})