add dhm suggested edits

Author: O957

R/summarize_ref_date_forecasts.R

@@ -120,6 +120,7 @@ summarize_ref_date_forecasts <- function(
       ),
       forecast_due_date = as.Date(!!reference_date) - 3,
       location_sort_order = ifelse(.data$location_name == "US", 0, 1)
+      # order table with national first, then alphabetically
     ) |>
     dplyr::arrange(.data$location_sort_order, .data$location_name) |>
     dplyr::left_join(

R/write_ref_date_summary.R

@@ -91,8 +91,7 @@ write_ref_date_summary <- function(
 
 #' Write ensemble forecast summary to disk.
 #'
-#' Function that generates and writes ensemble-only forecast data. This
-#' replicates the behavior of the old `get_map_data()` function.
+#' This function generates and writes ensemble-only forecast data.
 #'
 #' @param reference_date character, the reference date for
 #' the forecast in YYYY-MM-DD format (ISO-8601).
@@ -171,8 +170,7 @@ write_ref_date_summary_ens <- function(
 
 #' Write all-models forecast summary to disk.
 #'
-#' This function generates and writes forecast data for all models. This
-#' replicates the behavior of the legacy `get_forecast_data()` function.
+#' This function generates and writes forecast data for all models.
 #'
 #' @param reference_date character, the reference date for
 #' the forecast in YYYY-MM-DD format (ISO-8601).