diff --git a/RPackage/man/get_dcat_ap_rdf_modified_date.Rd b/RPackage/man/get_dcat_ap_rdf_modified_date.Rd new file mode 100644 index 0000000..839b77f --- /dev/null +++ b/RPackage/man/get_dcat_ap_rdf_modified_date.Rd @@ -0,0 +1,11 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/testing.R +\name{get_dcat_ap_rdf_modified_date} +\alias{get_dcat_ap_rdf_modified_date} +\title{Get the dcat_ap_rdf modified date} +\usage{ +get_dcat_ap_rdf_modified_date() +} +\description{ +Get the dcat_ap_rdf modified date +} diff --git a/RPackage/tests/testthat/test-polls_data.R b/RPackage/tests/testthat/test-polls_data.R index e55d7d0..c12f824 100644 --- a/RPackage/tests/testthat/test-polls_data.R +++ b/RPackage/tests/testthat/test-polls_data.R @@ -119,7 +119,7 @@ test_that(desc="throw warnings",{ test_that(desc="check modified date",{ - dcat_ap_rdf_modified_date <- get_dcat_ap_rdf_modified_date() - expect_true(abs(Sys.Date()-dcat_ap_rdf_modified_date < 14), info = "Please update 'dcterms:modified' in 'dcat-ap.rdf'") + dcat_ap_rdf_modified_date <- SwedishPolls:::get_dcat_ap_rdf_modified_date() + expect_true(abs(as.integer(Sys.Date()-dcat_ap_rdf_modified_date)) < 14, info = "Please update 'dcterms:modified' in 'dcat-ap.rdf'") })