clean up

Author: rpreen

R/acro_init.R

@@ -23,12 +23,9 @@ get_python <- function() {
 #'
 #' @param envname Name of the conda environment
 init_conda <- function(envname) { # nocov
-  envs <- reticulate::conda_list()
-  exists <- any(envs$name == envname)
-
-  if (!exists) {
+  if (condaenv_exists(envname = envname, conda = "auto")) {
     reticulate::conda_create(envname = envname, python_version = "3.12", channel = ch)
-    reticulate::conda_install(envname, packages = acro_pkg, channel = ch)
+    reticulate::conda_install(envname = envname, packages = acro_pkg, channel = ch)
   }
   reticulate::use_condaenv(envname, required = TRUE)
 }