style: styler (GHA)

Author: nmdefries

R/endpoints.R

@@ -202,10 +202,10 @@ pub_covid_hosp_facility <- function(
   # but correspond to epiweeks. Allow `collection_weeks` to be provided in
   # either day or week format.
   coercion_msg <- c(
-      "`collection_weeks` is in week format but `pub_covid_hosp_facility`
+    "`collection_weeks` is in week format but `pub_covid_hosp_facility`
        expects day format; dates will be converted to day format but may not
        correspond exactly to desired time range"
-    )
+  )
 
   if (test_class(collection_weeks, "EpiRange") && nchar(collection_weeks$from) == 6) {
     cli::cli_warn(coercion_msg, class = "epidatr__epirange_week_coercion")