From bd209d051a6c74fbca58147871bc4409e1a6e944 Mon Sep 17 00:00:00 2001
From: kellijohnson-NOAA <kelli.johnson@noaa.gov>
Date: Sun, 10 Dec 2023 08:14:27 -0800
Subject: [PATCH] fix(commit_catch)

---
 R/commit-.R | 11 +++--------
 1 file changed, 3 insertions(+), 8 deletions(-)

diff --git a/R/commit-.R b/R/commit-.R
index f7f275f..85de519 100644
--- a/R/commit-.R
+++ b/R/commit-.R
@@ -78,17 +78,12 @@ commit_catch <- function(dir_data = hakedata_wd(),
       sector == "ft" ~ "CAN_FreezeTrawl",
       sector == "jv" ~ "CAN_JV"
     )) %>%
-    tidyr::pivot_longer(
-      cols = !sector:Year,
-      names_to = "month"
-    ) %>%
-    dplyr::group_by(Year, sector) %>%
-    dplyr::summarize(catch = sum(value)) %>%
+    dplyr::group_by(year, sector) %>%
+    dplyr::summarize(catch = sum(catch)) %>%
     tidyr::pivot_wider(names_from = sector, values_from = catch) %>%
     dplyr::mutate(
       dplyr::across(dplyr::starts_with("CAN"), tidyr::replace_na, 0)
-    ) %>%
-    dplyr::rename(year = Year)
+    )
   inc <- list(sh, cp, ms, can) %>%
     purrr::reduce(dplyr::full_join, by = "year") %>%
     dplyr::rename(