diff --git a/RPackage/tests/testthat/test-polls_data.R b/RPackage/tests/testthat/test-polls_data.R index 188b9b6..eaf7534 100644 --- a/RPackage/tests/testthat/test-polls_data.R +++ b/RPackage/tests/testthat/test-polls_data.R @@ -121,7 +121,7 @@ test_that(desc="check modified date",{ SwedishPolls:::find_file_by_traversing(file_to_find = "dcat-ap.rdf") dcat_ap_rdf_modified_date <- suppressWarnings(SwedishPolls:::get_dcat_ap_rdf_modified_date()) if(is.null(dcat_ap_rdf_modified_date)) skip() - expect_true(abs(as.integer(Sys.Date()-dcat_ap_rdf_modified_date)) < 14, + expect_true(abs(as.integer(Sys.Date()-dcat_ap_rdf_modified_date)) < 365, label = "'dcterms:modified' element in '/dcat-ap.rdf' file is not updated, i.e. the statement 'modified date is within the last two weeks'") })