amend #62: collapse string for multiple authors (#63)

TimTaylor · web-flow · commit 3241888fa57f · 2024-12-16T14:42:31.000-06:00
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -3,9 +3,10 @@ Type: Package
 Title: A Lightweight Version of R Markdown
 Version: 0.4.11
 Authors@R: c(
-   person("Yihui", "Xie", role = c("aut", "cre"), email = "xie@yihui.name", comment = c(ORCID = "0000-0003-0645-5666", URL = "https://yihui.org")),
-   person()
-   )
+    person("Yihui", "Xie", role = c("aut", "cre"), email = "xie@yihui.name", comment = c(ORCID = "0000-0003-0645-5666", URL = "https://yihui.org")),
+    person("Tim", "Taylor", role = "ctb", comment = c(ORCID = "0000-0002-8587-7113")),
+    person()
+    )
 Description: Render R Markdown to Markdown (without using 'knitr'), and Markdown
     to lightweight HTML or 'LaTeX' documents with the 'commonmark' package (instead
     of 'Pandoc'). Some missing Markdown features in 'commonmark' are also
diff --git a/R/package.R b/R/package.R
@@ -134,7 +134,7 @@ pkg_desc = function(name = detect_pkg()) {
   names(d) = fields
   # remove single quotes on words (which are unnecessary IMO)
   for (i in c('Title', 'Description')) d[[i]] = sans_sq(d[[i]])
-  d[['Author']] = pkg_authors(d)
+  d[['Author']] = one_string(pkg_authors(d), ', ')
   d[['Authors@R']] = NULL
   # convert URLs to <a>, and escape HTML in other fields
   for (i in names(d)) d[[i]] = if (!is.na(d[[i]])) {
diff --git a/man/litedown-package.Rd b/man/litedown-package.Rd
