correcting example for CRAN release

DESCRIPTION

@@ -1,8 +1,8 @@
 Package: restatapi
 Type: Package
 Title: Search and Retrieve Data from Eurostat Database
-Date: 2021-11-22
-Version: 0.12.7
+Date: 2022-01-26
+Version: 0.12.8
 Encoding: UTF-8
 Authors@R: person("Mátyás", "Mészáros", email = "[email protected]", role = c("aut", "cre"))
 Description: Eurostat is the statistical office of the European Union and provides high quality statistics for Europe.

NEWS.md

@@ -1,3 +1,8 @@
+# restatapi 0.12.8
+
+- correction of example in `extract_toc()` function
+- CRAN release
+
 # restatapi 0.12.7
 
 - correction of parallel processing under Windows in the `get_eurostat_dsd()`, `get_eurostat_raw()` and `get_eurostat_data()` functions
@@ -20,6 +25,7 @@
 
 - adding timeout to examples
 - not testing example for the `search_eurostat_dsd()` and `create_filter_table()` function
+- CRAN release
 
 # restatapi 0.12.2
 

R/extract_toc.R

@@ -21,16 +21,16 @@
 #'          error = function(e) {xml_leafs<-""},
 #'          warning = function(w) {xml_leafs<-""})
 #' if (exists("xml_leafs")){
-#'   if (Sys.info()[['sysname']]=='Windows') {
-#'     xml_node<-as.character(xml_leafs[1])
-#'   } else {
-#'     xml_node<-xml_leafs[1]
-#'   }
-#'   restatapi::extract_toc(xml_node)
+#'    if (Sys.info()[['sysname']]=='Windows'){ 
+#'       xml_node<-as.character(xml_leafs[1])
+#'    }else{
+#'       xml_node<-xml_leafs[1]
+#'    }
+#'    restatapi::extract_toc(xml_node)
 #' }
 #' options(timeout=60)
 #' }
-#' 
+
 
 extract_toc<-function(ns){
   if (Sys.info()[['sysname']]=='Windows'){ns<-xml2::as_xml_document(ns)}