some last changes

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) {
 

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)

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){
 

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. 

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.

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"
+}