diff --git a/tests/testthat/test-RunModel_Ungauged.R b/tests/testthat/test-RunModel_Ungauged.R
index 4a60218daa65209bea477dbc4fbd6b8c7350c52d..19f3f657a9cbe0afee51e7c0b284fac3f8f8e017 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],