diff --git a/R/Figures.R b/R/Figures.R index 5fa298e8..c750ee58 100644 --- a/R/Figures.R +++ b/R/Figures.R @@ -1497,4 +1497,4 @@ TADA_GroupedScatterplot <- function(.data, group_col = "TADA.MonitoringLocationN # return scatterplot (one) or list of scatterplots (multiple) return(all_scatterplots) -} \ No newline at end of file +} diff --git a/tests/testthat/test-URLChecker.R b/tests/testthat/test-URLChecker.R index d9688a7b..dea5b641 100644 --- a/tests/testthat/test-URLChecker.R +++ b/tests/testthat/test-URLChecker.R @@ -1,7 +1,7 @@ # ignore warning # file("") only supports open = "w+" and open = "w+b": using the former # https://github.com/USEPA/EPATADA/pull/548 -suppressWarnings( +#suppressWarnings( test_that("URLs are not broken", { # extract urls function extract_urls <- function(text) { @@ -73,4 +73,4 @@ suppressWarnings( # verify that there are zero urls with failing response codes testthat::expect_equal(n, 0) }) -) +#)