From b5f238f13c36eb533272562b3d2214b5bfd2325e Mon Sep 17 00:00:00 2001
From: David <david.dorchies@inrae.fr>
Date: Fri, 29 Mar 2024 10:17:50 +0100
Subject: [PATCH] fix(test): warning on CreateCalibOptions due to Reservoir
 fixed params

Refs #72
---
 tests/testthat/test-RunModel_Ungauged.R | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/tests/testthat/test-RunModel_Ungauged.R b/tests/testthat/test-RunModel_Ungauged.R
index 4a60218..19f3f65 100644
--- a/tests/testthat/test-RunModel_Ungauged.R
+++ b/tests/testthat/test-RunModel_Ungauged.R
@@ -299,8 +299,8 @@ testDerivdedUngauged <- function(donorByDerivation) {
   e <- setupRunModel(griwrm = g, runRunModel = FALSE, Qobs2 = Qobs2)
   for (x in ls(e)) assign(x, get(x, e))
 
-  CalibOptions <- CreateCalibOptions(InputsModel)
-  CalibOptions[["Dam"]]$FixedParam <- c(650E6, 1)
+  CalibOptions <- CreateCalibOptions(InputsModel,
+                                     FixedParam = list(Dam = c(650E6, 1)))
   e <- runCalibration(g, Qobs2 = Qobs2, CalibOptions = CalibOptions)
   for(x in ls(e)) assign(x, get(x, e))
   expect_equal(Param[["54095"]][1:3],
-- 
GitLab