debug #195

opensdmx · Jan 24, 2024 · 0199973 · 0199973
1 parent 3c0c231
commit 0199973
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: rsdmx
 Version: 0.6-3
-Date: 2023-08-28
+Date: 2024-01-24
 Title: Tools for Reading SDMX Data and Metadata
 Authors@R: c(
   person("Emmanuel", "Blondel", role = c("aut", "cre"), email = "[email protected]", comment = c(ORCID = "0000-0002-5870-5762")),

diff --git a/R/SDMXConcepts-methods.R b/R/SDMXConcepts-methods.R
@@ -101,8 +101,8 @@ as.data.frame.SDMXConcepts <- function(x, ...,
            obj <- switch(class(obj),
                      "character" = NA,
                      "logical" = NA,
-                     "list" = structure(as.list(rep(NA,2)),
-                                        .Names = names(conceptsList[[1]]@Name))
+                     "list" = structure(as.list(rep(NA,length(concept@Name))),
+                                        .Names = names(concept@Name))
            )
          }
          return(obj)