chore(NEWS.md): update workflow link to point to the v2 branch of r-l…

…ib/actions repository fix(R/zzz.R): remove unused function is_url_available chore(codemeta.json): update fileSize field to 65.928KB chore(man/gitignore-package.Rd): update bug report link to point to PMassicotte/gitignore repository feat(vignettes/introduction.Rmd): add code chunk to check availability of https://www.toptal.com/developers/gitignore URL
ropensci · Dec 10, 2023 · bcb4311 · bcb4311
1 parent 58baa15
commit bcb4311
Show file tree

Hide file tree

Showing 5 changed files with 17 additions and 11 deletions.
diff --git a/NEWS.md b/NEWS.md
@@ -1,6 +1,7 @@
 # gitignore (development version)
 
 - Skip or do not execute code chunks in vignettes if the internet or the gitignore API is not available, to fix CRAN problems.
+- Update workflow link to point to the v2 branch of r-lib/actions repository.
 
 # gitignore 0.1.5
 

diff --git a/R/zzz.R b/R/zzz.R
@@ -1,12 +1,3 @@
 backend_url <- function() {
   "https://www.toptal.com/developers/gitignore"
 }
-
-is_url_available <- function(url_in = backend_url()) {
-  con <- url(url_in)
-  check <- suppressWarnings(
-    try(open.connection(con, open = "rt", timeout = 2), silent = TRUE)[1]
-  )
-  suppressWarnings(try(close.connection(con), silent = TTRUE))
-  ifelse(is.null(check), TRUE, FALSE)
-}
diff --git a/codemeta.json b/codemeta.json
@@ -213,7 +213,7 @@
     },
     "SystemRequirements": null
   },
-  "fileSize": "65.748KB",
+  "fileSize": "65.928KB",
   "releaseNotes": "https://github.com/ropensci/gitignore/blob/master/NEWS.md",
   "readme": "https://github.com/ropensci/gitignore/blob/main/README.md",
   "contIntegration": ["https://app.codecov.io/gh/ropensci/gitignore?branch=main", "https://github.com/PMassicotte/gitignore/actions/workflows/R-CMD-check.yaml"],

diff --git a/man/gitignore-package.Rd b/man/gitignore-package.Rd
diff --git a/vignettes/introduction.Rmd b/vignettes/introduction.Rmd
@@ -15,6 +15,19 @@ knitr::opts_chunk$set(
 
 ```
 
+```{r, echo = FALSE}
+is_url_available <- function() {
+  con <- url("https://www.toptal.com/developers/gitignore")
+  check <- suppressWarnings(
+    try(open.connection(con, open = "rt", timeout = 2), silent = TRUE)[1]
+  )
+  suppressWarnings(try(close.connection(con), silent = TTRUE))
+  ifelse(is.null(check), TRUE, FALSE)
+}
+
+```
+
+
 ## Basic idea
 
 Based on the definition proposed by [freecodecamp](https://www.freecodecamp.org/news/gitignore-what-is-it-and-how-to-add-to-repo/):