diff --git a/DESCRIPTION b/DESCRIPTION
index abf4e80..ea83d55 100644
--- 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 = "emmanuel.blondel1@gmail.com", comment = c(ORCID = "0000-0002-5870-5762")),
diff --git a/R/SDMXConcepts-methods.R b/R/SDMXConcepts-methods.R
index 2eab402..181b2c9 100644
--- 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)