fix: hydro test

bczernecki · Oct 21, 2024 · 6f200ce · 6f200ce
1 parent 9ac7075
commit 6f200ce
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/tests/testthat/test-hydro_metadata_imgw.R b/tests/testthat/test-hydro_metadata_imgw.R
@@ -4,7 +4,7 @@ h_d <- suppressWarnings(hydro_metadata_imgw("daily"))
 h_m <- suppressWarnings(hydro_metadata_imgw("monthly"))
 
 test_that("hydro-metadata works!", {
-  if (is.list(h_d) && is.list(h_m) && is.list(h_a)) {
+  if (is.list(h_d) && is.list(h_m)) {
     expect_equal(dim(h_d[[1]]), c(10, 1))
     expect_equal(dim(h_d[[2]]), c(10, 1))
     expect_equal(dim(h_m[[1]]), c(10, 1))