diff --git a/R/gen_jobs.R b/R/gen_jobs.R index 50005a4..dd60330 100644 --- a/R/gen_jobs.R +++ b/R/gen_jobs.R @@ -21,8 +21,8 @@ gen_list_jobs <- function(database = c("genesis", "regio"), ...) { gen_fun <- test_database_function(database, - error.input = T, - text = T) + error.input = TRUE, + text = TRUE) if (length(database) != 1) { diff --git a/R/gen_modified_data.R b/R/gen_modified_data.R index 5b9b80f..dc7a8ad 100644 --- a/R/gen_modified_data.R +++ b/R/gen_modified_data.R @@ -33,7 +33,7 @@ gen_modified_data <- function(code = "", ...) { gen_fun <- test_database_function(database, - error.input = T, + error.input = TRUE, text = verbose) type <- match.arg(type) diff --git a/R/gen_qualitysigns.R b/R/gen_qualitysigns.R index daa2a1c..346df2a 100644 --- a/R/gen_qualitysigns.R +++ b/R/gen_qualitysigns.R @@ -12,8 +12,8 @@ gen_signs <- function(database = c("all", "genesis", "zensus", "regio"), ...) { gen_fun <- test_database_function(database, - error.input = T, - text = T) + error.input = TRUE, + text = TRUE) res <- lapply(gen_fun, function(db){ diff --git a/README.Rmd b/README.Rmd index d947c1a..1591c2e 100644 --- a/README.Rmd +++ b/README.Rmd @@ -83,4 +83,4 @@ Cached objects are stored in the memory and do not persist across R sessions. ## Disclaimer -This package is in no way affiliated with the German Federal Statistical Office (Destatis). It is a simple wrapper providing R functions to access Destatis' API. The package authors are in no way responsible for the data that can be retrieved using its functions. The license of this package solely applies to its source code. +This package is in no way affiliated with the German Federal Statistical Office (Destatis) or the 'Verbund Statistische Ämter des Bundes und der Länder'. It is a simple wrapper providing R functions to access Destatis' API. The package authors are in no way responsible for the data that can be retrieved using its functions. The license of this package solely applies to its source code. diff --git a/README.md b/README.md index 26fd0c5..5290da8 100644 --- a/README.md +++ b/README.md @@ -104,7 +104,8 @@ sessions. ## Disclaimer This package is in no way affiliated with the German Federal Statistical -Office (Destatis). It is a simple wrapper providing R functions to -access Destatis’ API. The package authors are in no way responsible for -the data that can be retrieved using its functions. The license of this +Office (Destatis) or the ‘Verbund Statistische Ämter des Bundes und der +Länder’. It is a simple wrapper providing R functions to access +Destatis’ API. The package authors are in no way responsible for the +data that can be retrieved using its functions. The license of this package solely applies to its source code. diff --git a/tests/testthat/modified2/api/catalogue/modifieddata-40eb64.R b/tests/testthat/modified2/api/catalogue/modifieddata-40eb64.R deleted file mode 100644 index 745112b..0000000 --- a/tests/testthat/modified2/api/catalogue/modifieddata-40eb64.R +++ /dev/null @@ -1,5 +0,0 @@ -structure(list(method = "GET", url = "/api/catalogue/modifieddata?username=ABCDEF&password=1234abcd&username=ABCDEF&password=1234abcdselection=61111&type=all&date=20.07.2024", - status_code = 404L, headers = structure(list(Date = "Sat, 20 Jul 2024 16:13:04 GMT", - Server = "Apache", `Content-Length` = "106", `Content-Type` = "application/json"), class = "httr2_headers"), - body = charToRaw("{\"Code\":2,\"Content\":\"Ein Fehler ist aufgetreten. (Bitte geben Sie Ihren Nutzernamen ein.)\",\"Type\":\"ERROR\"}"), - cache = new.env(parent = emptyenv())), class = "httr2_response") diff --git a/tests/testthat/modified2/api/catalogue/modifieddata-c888c0.json b/tests/testthat/modified2/api/catalogue/modifieddata-c888c0.json new file mode 100644 index 0000000..91f51a4 --- /dev/null +++ b/tests/testthat/modified2/api/catalogue/modifieddata-c888c0.json @@ -0,0 +1,25 @@ +{ + "Ident": { + "Service": "catalogue", + "Method": "modifieddata" + }, + "Status": { + "Code": 0, + "Content": "erfolgreich", + "Type": "Information" + }, + "Parameter": { + "username": "********************", + "password": "********************", + "selection": "61111", + "type": "Alle", + "date": "21.07.2024", + "pagelength": "100", + "language": "de", + "area": "Alle" + }, + "List": [ + null + ], + "Copyright": "© Statistisches Bundesamt (Destatis), 2024" +}