add urlchecker

assignUser · Dec 8, 2023 · b7fbe2f · b7fbe2f
1 parent 96a476a
commit b7fbe2f
Showing 1 changed file with 7 additions and 0 deletions.
diff --git a/r/bootstrap.R b/r/bootstrap.R
@@ -38,6 +38,13 @@ if (!is_dev) {
   cli::cli_alert_info("Removing badges from Readme.md")
   system2("sed", c("-i", "'/^<!--- badges: start -->$/,/^<!--- badges: stop -->$/d'", "README.md"))
 
+  cli::cli_alert_info("Running urlchecker")
+  url_res <- urlchecker::url_check()
+  if (nrow(url_res) > 0) {
+    print(url_res)
+    cli::cli_abort("Broken URLs found, can't proceed.")
+  }
+
   VERSION <- get_checksum_version()
   if (!is.na(VERSION)) {
     cli::cli_alert_info("Updating checksums for libarrow version: {VERSION}")