Deal with multiple languages in DESCRIPTION.

r-lib · Nov 6, 2024 · cc6ea44 · cc6ea44
1 parent 2920e56
commit cc6ea44
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/R/package.R b/R/package.R
@@ -112,7 +112,10 @@ get_pkg_lang <- function(pkg) {
   }
 
   if (pkg$desc$has_fields("Language")) {
-    return(pkg$desc$get_field("Language"))
+    field <- pkg$desc$get_field("Language")
+    if (length(field) && nchar(field) > 0) {
+      return(regmatches(field, regexpr("[^,]+", field)))
+    }
   }
 
   return("en")