diff --git a/DESCRIPTION b/DESCRIPTION
index e07fa3d982bcd45f4daaf04021fca00bd79689b5..e146d0e111c154a24e628d62e4b9124cb755bd16 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: airGR
 Type: Package
 Title: Suite of GR Hydrological Models for Precipitation-Runoff Modelling
-Version: 1.6.9.5
+Version: 1.6.9.6
 Date: 2021-01-08
 Authors@R: c(
   person("Laurent", "Coron", role = c("aut", "trl"), comment = c(ORCID = "0000-0002-1503-6204")),
diff --git a/NEWS.md b/NEWS.md
index e43b5023ebcb1c73fa72ffd2403a40a57d0b7bbf..0d1ef362ad5e249aaec48fdc607453dd7d60cdd4 100644
--- a/NEWS.md
+++ b/NEWS.md
@@ -2,7 +2,7 @@
 
 
 
-### 1.6.9.5 Release Notes (2021-01-08)
+### 1.6.9.6 Release Notes (2021-01-08)
 
 #### New features
 
diff --git a/R/Utils.R b/R/Utils.R
index adf2d57068faaebb17a81a7657964af891355cfb..a6153a7a6b983cf94fb3e7a4a8c754e2340d9b34 100644
--- a/R/Utils.R
+++ b/R/Utils.R
@@ -113,12 +113,10 @@
     i <- as.character(i)
   }
   if (is.numeric(i)) {
-    res <- .ExtractInputsModel(x, i)
+    .ExtractInputsModel(x, i)
   } else {
-    res <- lapply(i, function(name) x[[name, exact = TRUE]])
-    names(res) <- i
+    NextMethod()
   }
-  return(res)
 }
 
 
@@ -161,10 +159,8 @@
     i <- as.character(i)
   }
   if (is.numeric(i)) {
-    res <- .ExtractOutputsModel(x, i)
+    .ExtractOutputsModel(x, i)
   } else {
-    res <- lapply(i, function(name) x[[name, exact = TRUE]])
-    names(res) <- i
+    NextMethod()
   }
-  return(res)
 }