diff --git a/R/CreateInputsModel.R b/R/CreateInputsModel.R
index e025c85173c24a0083ad94a311244e21e26f967a..5b4fa88a0f4bbd0f436273db78ce8b16e8a21680 100644
--- a/R/CreateInputsModel.R
+++ b/R/CreateInputsModel.R
@@ -339,7 +339,7 @@ CreateInputsModel <- function(FUN_MOD,
       Qupstream[,iConvBasins] <- Qupstream[,iConvBasins] * BasinAreas[iConvBasins] * 1e3
     } else if (QupstrUnit == "m3/s") {
       Qupstream <- Qupstream * TimeStep
-    } else if (QupstrUnit %in% c("l/s", "L/s")) {
+    } else if (QupstrUnit == "l/s") {
       Qupstream <- Qupstream * TimeStep / 1e3
     }
     InputsModel <- c(InputsModel, list(Qupstream = Qupstream,