Fix URLs in news.R script

r-lib · Jul 25, 2023 · 525ebbe · 525ebbe
1 parent 3b43a3a
commit 525ebbe
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 2 deletions.
diff --git a/exec/news.R b/exec/news.R
@@ -107,11 +107,12 @@ New package releases on CRAN
 format_result <- function(result) {
   pkg <- result$package
   ago <- vague_dt(Sys.time() - parse_iso_8601(result$date))
+  url <- paste0("https://r-pkg.org/pkg/", pkg$Package)
   cli_li()
   cli_text("{.pkg {pkg$Package}} {pkg$Version} --
            {ago} by {.emph {pkg$Maintainer}}")
   cli_text("{pkg$Title}")
-  cli_text("{.url https://r-pkg.org/pkg/{pkg$Package}}")
+  cli_text("{.url {url}}")
 }
 
 if (is.null(sys.calls())) {

diff --git a/inst/examples/apps/news.R b/inst/examples/apps/news.R
@@ -107,11 +107,12 @@ New package releases on CRAN
 format_result <- function(result) {
   pkg <- result$package
   ago <- vague_dt(Sys.time() - parse_iso_8601(result$date))
+  url <- paste0("https://r-pkg.org/pkg/", pkg$Package)
   cli_li()
   cli_text("{.pkg {pkg$Package}} {pkg$Version} --
            {ago} by {.emph {pkg$Maintainer}}")
   cli_text("{pkg$Title}")
-  cli_text("{.url https://r-pkg.org/pkg/{pkg$Package}}")
+  cli_text("{.url {url}}")
 }
 
 if (is.null(sys.calls())) {