Fixed extra-line in object documentation template

globalgov · Feb 15, 2021 · 43578f6 · 43578f6
1 parent ee8f2e3
commit 43578f6
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/data_export.R b/R/data_export.R
@@ -90,7 +90,7 @@ export_data <- function(..., database, URL) {
   dsnvar <- lapply(db, ncol)
   dsvar <- lapply(db, colnames)
   dsvarstr <- lapply(lapply(db, colnames), str_c, collapse=", ")
-  describe <- paste0("#'\\describe{\n", paste0("#' \\item{",dsnames,": }", "{A dataset with ",dsobs," observations and the following ",dsnvar," variables: ", dsvarstr,".}\n", collapse = ""), "#' }")
+  describe <- paste0("#'\\describe{\n", paste0("#' \\item{",dsnames,": }", "{A dataset with ",dsobs," observations and the following ",dsnvar," variables: ", dsvarstr,".}", collapse = ""), "#' }")
   sourceelem <- paste0("#' @source \\url{", URL,"}", collapse = "")
   #Output
   qtemplate("qDataDBDoc.R",