diff --git a/R/process_tests_it_chi_deaths.R b/R/process_tests_it_chi_deaths.R
index 69dac54ee..597e71fcb 100644
--- a/R/process_tests_it_chi_deaths.R
+++ b/R/process_tests_it_chi_deaths.R
@@ -6,7 +6,8 @@
 process_tests_it_chi_deaths <- function(data, update = previous_update()) {
   comparison <- produce_test_comparison(
     old_data = produce_it_chi_deaths_tests(
-      read_file(get_slf_chi_deaths_path(update = update))),
+      read_file(get_slf_chi_deaths_path(update = update))
+    ),
     new_data = produce_it_chi_deaths_tests(data)
   ) %>%
     write_tests_xlsx(sheet_name = "it_chi_deaths", workbook_name = "lookup")
diff --git a/R/process_tests_ltcs.R b/R/process_tests_ltcs.R
index 3b2d2d9e3..7075ec742 100644
--- a/R/process_tests_ltcs.R
+++ b/R/process_tests_ltcs.R
@@ -7,7 +7,6 @@
 #'
 #' @export
 process_tests_ltcs <- function(data, year) {
-
   # Find and flag any duplicate chis and chi/postcode combinations
   duplicates <- data %>%
     dplyr::summarise(
diff --git a/R/process_tests_sc_demographics.R b/R/process_tests_sc_demographics.R
index 31fb9f3ca..7e752aaf4 100644
--- a/R/process_tests_sc_demographics.R
+++ b/R/process_tests_sc_demographics.R
@@ -10,10 +10,10 @@
 #'
 #' @export
 process_tests_sc_demographics <- function(data) {
-
   comparison <- produce_test_comparison(
     old_data = produce_sc_demog_lookup_tests(
-      read_file(get_sc_demog_lookup_path(update = previous_update()))),
+      read_file(get_sc_demog_lookup_path(update = previous_update()))
+    ),
     new_data = produce_sc_demog_lookup_tests(
       data
     )