Fix error class name that referred to different function

brookslogan · nmdefries · web-flow · commit 5cc0d159d0a2 · 2024-11-22T11:02:25.000-08:00
Co-authored-by: nmdefries &lt;42820733+nmdefries@users.noreply.github.com&gt;
diff --git a/R/slide.R b/R/slide.R
@@ -702,7 +702,7 @@ epi_slide_opt <- function(
         "`.x` must be either grouped by {expected_group_keys} or ungrouped; if the latter,
          we'll temporarily group by {expected_group_keys} for this operation. You may need
         to aggregate your data first, see aggregate_epi_df().",
-        class = "epiprocess__epi_slide__invalid_grouping"
+        class = "epiprocess__epi_slide_opt__invalid_grouping"
       )
     }
   } else {

Original file line number	Diff line number	Diff line change
`@@ -702,7 +702,7 @@ epi_slide_opt <- function(`
`702`	`702`	"`.x` must be either grouped by {expected_group_keys} or ungrouped; if the latter,
`703`	`703`	`we'll temporarily group by {expected_group_keys} for this operation. You may need`
`704`	`704`	`to aggregate your data first, see aggregate_epi_df().",`
`705`		`- class = "epiprocess__epi_slide__invalid_grouping"`
	`705`	`+ class = "epiprocess__epi_slide_opt__invalid_grouping"`
`706`	`706`	`)`
`707`	`707`	`}`
`708`	`708`	`} else {`