From 1e542e52963e111c0e4d7e73e7d9c192d8c59d8f Mon Sep 17 00:00:00 2001
From: Pascal Sauer <156898545+pascal-sauer@users.noreply.github.com>
Date: Thu, 5 Dec 2024 15:36:31 +0100
Subject: [PATCH] use piamenv::installDeps

---
 DESCRIPTION            |  2 +-
 start_bundle_coupled.R | 15 ++-------------
 2 files changed, 3 insertions(+), 14 deletions(-)

diff --git a/DESCRIPTION b/DESCRIPTION
index a0114927a..b07b7f2f9 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -53,7 +53,7 @@ Imports:
     ncdf4,
     nleqslv,
     optparse,
-    piamenv (>= 0.5.4),
+    piamenv (>= 0.6.0),
     piamInterfaces (>= 0.34.1),
     piamPlotComparison (>= 0.0.10),
     piamutils,
diff --git a/start_bundle_coupled.R b/start_bundle_coupled.R
index a864b4d15..f68040a3b 100755
--- a/start_bundle_coupled.R
+++ b/start_bundle_coupled.R
@@ -93,19 +93,6 @@ run_compareScenarios <- "short"
 # use an empty magpie model (just reproduces the latest AMT results)
 magpie_empty <- FALSE
 
-########################################################################################################
-#################################  install magpie dependencies  ########################################
-########################################################################################################
-if (!is.null(renv::project())) {
-  magpieDeps <- renv::dependencies(path_magpie)
-  installedPackages <- installed.packages()[, "Package"]
-  missingDeps <- setdiff(unique(magpieDeps$Package), installedPackages)
-  if (length(missingDeps) > 0) {
-    message("Installing missing MAgPIE dependencies ", paste(missingDeps, collapse = ", "))
-    renv::install(missingDeps)
-  }
-}
-
 ########################################################################################################
 #################################  load command line arguments  ########################################
 ########################################################################################################
@@ -154,6 +141,8 @@ dir.create(file.path(path_magpie, "output"), showWarnings = FALSE)
 
 ensureRequirementsInstalled(rerunPrompt = "start_bundle_coupled.R")
 
+piamenv::installDeps(path_magpie)
+
 errorsfound <- 0
 startedRuns <- NULL
 finishedRuns <- NULL