diff --git a/R/slide.R b/R/slide.R
index a75010fb8..96beb8280 100644
--- a/R/slide.R
+++ b/R/slide.R
@@ -691,14 +691,14 @@ epi_slide_opt <- function(
       ~f, ~package, ~namer,
       frollmean, "data.table", ~ if (is.logical(.x)) "prop" else "av",
       frollsum, "data.table", ~ if (is.logical(.x)) "count" else "sum",
-      frollapply, "data.table", ~ "slide",
+      frollapply, "data.table", ~"slide",
       slide_sum, "slider", ~ if (is.logical(.x)) "count" else "sum",
-      slide_prod, "slider", ~ "prod",
+      slide_prod, "slider", ~"prod",
       slide_mean, "slider", ~ if (is.logical(.x)) "prop" else "av",
-      slide_min, "slider", ~ "min",
-      slide_max, "slider", ~ "max",
-      slide_all, "slider", ~ "all",
-      slide_any, "slider", ~ "any",
+      slide_min, "slider", ~"min",
+      slide_max, "slider", ~"max",
+      slide_all, "slider", ~"all",
+      slide_any, "slider", ~"any",
     )
   f_info <- f_possibilities %>%
     filter(map_lgl(.data$f, ~ identical(.f, .x)))