diff --git a/R/Utils.R b/R/Utils.R
index db0c483992745bea0b177c97e395793c6fb2462a..2351a168b8f9b33294a1b1e43f52c42de5c4c1fc 100644
--- a/R/Utils.R
+++ b/R/Utils.R
@@ -27,7 +27,6 @@
 ## function to extract model features
 .GetFeatModel <- function(FUN_MOD, DatesR) {
   FeatMod <- .FeatModels()
-  FUN_MOD <- match.fun(FUN_MOD)
   NameFunMod <- ifelse(test = FeatMod$Pkg %in% "airGR",
                        yes  = paste("RunModel", FeatMod$NameMod, sep = "_"),
                        no   = FeatMod$NameMod)