From 7bf03d770f180bacd6ebcf800f420f7091433de7 Mon Sep 17 00:00:00 2001
From: Eric Langowski <33432469+erhla@users.noreply.github.com>
Date: Mon, 22 Jul 2024 12:02:16 -0500
Subject: [PATCH] attempt 2 to style

---
 data-raw/sample_tax_bills/sample_tax_bills_detail.R | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/data-raw/sample_tax_bills/sample_tax_bills_detail.R b/data-raw/sample_tax_bills/sample_tax_bills_detail.R
index d9c43de..0f22b06 100644
--- a/data-raw/sample_tax_bills/sample_tax_bills_detail.R
+++ b/data-raw/sample_tax_bills/sample_tax_bills_detail.R
@@ -48,11 +48,13 @@ extract_tax_bill <- function(file) {
       agency_name = str_squish(agency_name),
       flag = is.na(prev_tax),
       prev_tax = if_else(flag,
-                         pension,
-                         prev_tax),
+        pension,
+        prev_tax
+      ),
       pension = if_else(flag,
-                        NA,
-                        pension)
+        NA,
+        pension
+      )
     ) %>%
     select(-flag) %>%
     filter(