Update R/utils.R

Co-authored-by: Carl A. B. Pearson <pearsonca@users.noreply.github.com>
epinowcast · Jan 3, 2024 · dbd88dc · dbd88dc
1 parent b9455de
commit dbd88dc
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/R/utils.R b/R/utils.R
@@ -199,9 +199,8 @@ enw_example <- function(type = c(
 #' )
 coerce_date <- function(dates) {
   if (is.null(dates)) {
-    return(data.table::as.IDate(.Date(numeric())))
+    return(data.table::as.IDate(c()))
   }
-
   if (length(dates) == 0) {
     return(data.table::as.IDate(dates))
   }