diff --git a/R/CreateCalibOptions.R b/R/CreateCalibOptions.R
index e458ce708937d71a16339097dc3efd98d6b8e636..28e34c8aa23a11ee8243a95dc364be8b99b6dfa7 100644
--- a/R/CreateCalibOptions.R
+++ b/R/CreateCalibOptions.R
@@ -29,7 +29,7 @@ CreateCalibOptions <- function(FUN_MOD,
   ObjectClass <- FeatFUN_MOD$Class
 
   if (identical(FUN_MOD, RunModel_Lag) && IsSD) {
-      stop("RunModel_Lag should not be used with 'isSD=TRUE'")
+      stop("RunModel_Lag should not be used with 'IsSD=TRUE'")
   }
   if (IsHyst) {
     ObjectClass <- c(ObjectClass, "hysteresis")