Fix r-devel failure (#2697)

Fixes #2695
r-lib · Jul 5, 2024 · 31a6b7d · 31a6b7d
1 parent 812e8c8
commit 31a6b7d
Showing 1 changed file with 8 additions and 4 deletions.
diff --git a/R/build-home-authors.R b/R/build-home-authors.R
@@ -272,10 +272,14 @@ citation_provided <- function(src_path) {
 }
 
 citation_auto <- function(pkg) {
-  cit_info <- utils::packageDescription(
-    path_file(pkg$src_path),
-    lib.loc = path_dir(pkg$src_path)
-  )
+  desc <- read_desc(pkg$src_path)
+  cit_info <- as.list(desc$get(desc$fields()))
+  #  utils::packageDescription(
+  #   pkg$package,
+  #   lib.loc = path_dir(pkg$src_path)
+  # )
+  # browser()
+# C
   cit_info$`Date/Publication` <- cit_info$`Date/Publication` %||% Sys.time()
   if (!is.null(cit_info$Title)) cit_info$Title <- str_squish(cit_info$Title)