Update more to k5cents

R/md-issue.R

@@ -12,7 +12,7 @@
 #' @family inline functions
 #' @family markdown extensions
 #' @examples
-#' md_issue("kiernann/gluedown", 1:5)
+#' md_issue("k5cents/gluedown", 1:5)
 #' @export
 md_issue <- function(repo, num) {
   if (suppressWarnings(any(is.na(as.numeric(num))))) {

README.Rmd

@@ -40,7 +40,7 @@ The development version can be installed from [GitHub][gh]:
 
 ```{r develop, eval=FALSE}
 # install.packages("remotes")
-remotes::install_github("kiernann/gluedown")
+remotes::install_github("k5cents/gluedown")
 ```
 
 ## Usage
@@ -134,15 +134,15 @@ to abide by its terms.
 [life_link]: https://lifecycle.r-lib.org/articles/stages.html#maturing
 [cran_badge]: https://www.r-pkg.org/badges/version/gluedown
 [cran_link]: https://CRAN.R-project.org/package=gluedown
-[ga_badge]: https://github.com/kiernann/gluedown/workflows/R-CMD-check/badge.svg
-[ga_link]: https://github.com/kiernann/gluedown/actions
-[cov_badge]: https://img.shields.io/codecov/c/github/kiernann/gluedown/master.svg
-[cov_link]: https://app.codecov.io/gh/kiernann/gluedown?branch=master'
+[ga_badge]: https://github.com/k5cents/gluedown/workflows/R-CMD-check/badge.svg
+[ga_link]: https://github.com/k5cents/gluedown/actions
+[cov_badge]: https://img.shields.io/codecov/c/github/k5cents/gluedown/master.svg
+[cov_link]: https://app.codecov.io/gh/k5cents/gluedown?branch=master'
 [dl_badge]: https://cranlogs.r-pkg.org/badges/grand-total/gluedown
-[coc]: https://kiernann.github.io/gluedown/CODE_OF_CONDUCT.html
+[coc]: https://k5cents.github.io/gluedown/CODE_OF_CONDUCT.html
 [cran]: https://cran.r-project.org/package=gluedown
 [gfm]: https://github.github.com/gfm/
-[gh]: https://github.com/kiernann/gluedown
+[gh]: https://github.com/k5cents/gluedown
 [glue]: https://github.com/tidyverse/glue
 [inline]: https://rmarkdown.rstudio.com/lesson-4.html
 [knitr]: https://github.com/yihui/knitr

README.md

@@ -11,9 +11,9 @@ experimental](https://img.shields.io/badge/lifecycle-maturing-blue.svg)](https:/
 status](https://www.r-pkg.org/badges/version/gluedown)](https://CRAN.R-project.org/package=gluedown)
 ![Downloads](https://cranlogs.r-pkg.org/badges/grand-total/gluedown)
 [![Codecov test
-coverage](https://img.shields.io/codecov/c/github/kiernann/gluedown/master.svg)](https://app.codecov.io/gh/kiernann/gluedown?branch=master')
+coverage](https://img.shields.io/codecov/c/github/k5cents/gluedown/master.svg)](https://app.codecov.io/gh/k5cents/gluedown?branch=master')
 [![R build
-status](https://github.com/kiernann/gluedown/workflows/R-CMD-check/badge.svg)](https://github.com/kiernann/gluedown/actions)
+status](https://github.com/k5cents/gluedown/workflows/R-CMD-check/badge.svg)](https://github.com/k5cents/gluedown/actions)
 <!-- badges: end -->
 
 The goal of `gluedown` is to ease the transition from R’s powerful
@@ -33,11 +33,11 @@ install.packages("gluedown")
 ```
 
 The development version can be installed from
-[GitHub](https://github.com/kiernann/gluedown):
+[GitHub](https://github.com/k5cents/gluedown):
 
 ``` r
 # install.packages("remotes")
-remotes::install_github("kiernann/gluedown")
+remotes::install_github("k5cents/gluedown")
 ```
 
 ## Usage
@@ -106,8 +106,8 @@ abb <- state.abb[match(name, state.name)]
 # `r md_italic(abb)`
 ```
 
-In this case, our randomly selected state is **Maine**, which has the
-abbreviation *ME*.
+In this case, our randomly selected state is **Texas**, which has the
+abbreviation *TX*.
 
 ### Pipes
 
@@ -148,7 +148,7 @@ md_task(legislation, check = 1:2)
 
 Please note that the `gluedown` project is released with a [Contributor
 Code of
-Conduct](https://kiernann.github.io/gluedown/CODE_OF_CONDUCT.html). By
+Conduct](https://k5cents.github.io/gluedown/CODE_OF_CONDUCT.html). By
 contributing to this project, you agree to abide by its terms.
 
 <!-- links: start -->

tests/testthat/test-github-issue.R

@@ -6,14 +6,14 @@ library(knitr)
 library(glue)
 
 test_that("md_issue creates GitHub auto-link URL", {
-  issue <- md_issue("kiernann/gluedown", 1)
+  issue <- md_issue("k5cents/gluedown", 1)
   convert <- str_c("https://github.com/", str_replace(issue, "#", "/issues/"))
-  url <- "https://github.com/kiernann/gluedown/issues/1"
+  url <- "https://github.com/k5cents/gluedown/issues/1"
   expect_equal(convert, url)
 })
 
 test_that("md_issue returns error without issue number", {
-  expect_error(md_issue("kiernann/gluedown", "one"))
+  expect_error(md_issue("k5cents/gluedown", "one"))
 })
 
 test_that("md_issue returns error without correct repo format", {