Fix tests

Now passes, ready to submit to CRAN
ropensci · Sep 19, 2017 · bddb1e1 · bddb1e1
1 parent 5bc997d
commit bddb1e1
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/tests/testthat/test-process_gz.R b/tests/testthat/test-process_gz.R
@@ -30,7 +30,7 @@ context("get_GSOD")
                                                  stations,
                                                  cache_dir,
                                                  years)
-              expect_length(agro_list, 11304)
+              expect_length(agro_list, 11302)
 
               RP_list <- .subset_country_list(country,
                                               country_list,

diff --git a/tests/testthat/test-reformat_GSOD.R b/tests/testthat/test-reformat_GSOD.R
@@ -8,7 +8,7 @@ test_that("reformat_GSOD file_list parameter reformats data properly", {
   ftp_base <- "ftp://ftp.ncdc.noaa.gov/pub/data/gsod/1960/"
   test_files <- c("066000-99999-1960.op.gz", "066200-99999-1960.op.gz")
   dest <- tempdir()
-  destinations <- paste0(dest, "/", test_files)
+  destinations <- file.path(dest, test_files)
 
   Map(function(u, d) download.file(u, d, mode = "wb"),
       paste0(ftp_base, test_files), destinations)