refactor(warning): review warning message returned when LengthHydro > 1000

R/CreateInputsModel.R

@@ -157,7 +157,7 @@ CreateInputsModel <- function(FUN_MOD,
       warning("'Qupstream' contains NA values: model outputs will contain NAs")
     }
     if(any(LengthHydro > 1000)) {
-      warning("The unit of 'LengthHydro' has changed from m to km in v1.7 of airGR: values superior to 1000 km seem unrealistic")
+      warning("The unit of 'LengthHydro' has changed from m to km in airGR >= 1.6.12: values superior to 1000 km seem unrealistic")
     }
     QupstrUnit <- tolower(QupstrUnit)
     QupstrUnit <- match.arg(arg = QupstrUnit, choices = c("mm", "m3", "m3/s", "l/s"))