diff --git a/R/create_wm_ror.R b/R/create_wm_ror.R
index 0cb4b28..1755b6b 100644
--- a/R/create_wm_ror.R
+++ b/R/create_wm_ror.R
@@ -37,6 +37,9 @@ create_wm_ror <- function(data, start = NULL, startday = "samedi", sort_areas =
 
   #On cherche le jour précedent a notre date de prevision
   endday <- as.numeric(format(start, "%u")) - 1
+  if (endday < 1) {
+    endday <- 7
+  }
 
   #on recupere les dates de debut et
   date_ini_fil <- get_previous(startday, date = start)