From ef4df2974487bbb2261d1202e688ad3c9736fa6b Mon Sep 17 00:00:00 2001 From: an-avocado <4lvaro.ramos@gmail.com> Date: Mon, 18 May 2026 15:21:17 -0700 Subject: [PATCH] fix --- DESCRIPTION | 2 +- R/give_candygrams.R | 4 ++-- README.md | 2 +- 3 files changed, 4 insertions(+), 4 deletions(-) diff --git a/DESCRIPTION b/DESCRIPTION index d58c2fe..32b258a 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -19,6 +19,6 @@ Imports: glue, stringr, english -RoxygenNote: 7.1.2 Suggests: testthat (>= 2.1.0) +Config/roxygen2/version: 8.0.0 diff --git a/R/give_candygrams.R b/R/give_candygrams.R index 8d71397..16da079 100644 --- a/R/give_candygrams.R +++ b/R/give_candygrams.R @@ -6,7 +6,7 @@ #' #' @return A candy gram announcement #' -#' @importFrom stringr str_detect str_to_title +#' @importFrom stringr str_detect str_to_title str_trim #' @importFrom english as.english #' #' @export @@ -30,7 +30,7 @@ give_candygrams <- function(person, number, number <- str_to_title(as.english(number)) - glue::glue("{number} for {person}.") + glue::glue("{number} for {person}. {extra_message}") |> str_trim(side = "both") diff --git a/README.md b/README.md index 876c029..d8ebbce 100644 --- a/README.md +++ b/README.md @@ -105,5 +105,5 @@ give_candygrams("Glen Coco", 4) ``` r give_candygrams("Gretchen Weiners", 4) -#> [1] "None for Grethen Weiners." +#> None for Gretchen Weiners. ```