diff --git a/R/CreateRunOptions.R b/R/CreateRunOptions.R
index af299046429fb9d3c21c564cc5ceb2d34b4dc3e4..36a462e05ea041a79b45853e427ea8ce9c220687 100644
--- a/R/CreateRunOptions.R
+++ b/R/CreateRunOptions.R
@@ -34,7 +34,7 @@ CreateRunOptions <- function(FUN_MOD, InputsModel,
   }
   if ("CemaNeige" %in% FeatFUN_MOD$Class) {
     FeatFUN_MOD$IsHyst <- IsHyst
-    if (isHyst) {
+    if (IsHyst) {
       ObjectClass <- c(ObjectClass, "hysteresis")
       FeatFUN_MOD$NbParam <- FeatFUN_MOD$NbParam + 2
     }