diff --git a/R/TotalSpellTimeExceedingThreshold.R b/R/TotalSpellTimeExceedingThreshold.R
index 72a51e0a7d0cd06a85d5b86949c1517da2028768..5992b8282f97d603f4874399be0eae9ef4c0e6b3 100644
--- a/R/TotalSpellTimeExceedingThreshold.R
+++ b/R/TotalSpellTimeExceedingThreshold.R
@@ -389,8 +389,6 @@ TotalSpellTimeExceedingThreshold <- function(data, threshold, spell, op = '>',
         warning("Parameter 'dates' must have named dimensions if 'start' and ",
                 "'end' are not NULL. All data will be used.")
       }
-      data <- SelectPeriodOnData(data, dates, start, end, 
-                                 time_dim = time_dim, ncores = ncores)
     }
   }