fix(r): Correct selector in countdown_style() (#47)

gadenbuie · Feb 3, 2024 · 9ee6b7f · 9ee6b7f
1 parent 3420409
commit 9ee6b7f
Show file tree

Hide file tree

Showing 4 changed files with 5 additions and 4 deletions.
diff --git a/r/DESCRIPTION b/r/DESCRIPTION
@@ -22,4 +22,4 @@ Suggests:
 Config/testthat/edition: 3
 Encoding: UTF-8
 Roxygen: list(markdown = TRUE)
-RoxygenNote: 7.3.0
+RoxygenNote: 7.3.1
diff --git a/r/R/countdown.R b/r/R/countdown.R
@@ -345,7 +345,7 @@ countdown_style <- function(
   color_warning_background = "#E6C229",
   color_warning_border = prismatic::clr_darken(color_warning_background, 0.1),
   color_warning_text = NULL,
-  .selector = "root"
+  .selector = ":root"
 ) {
   # get user args and defaults of current call
   arg_names <- names(formals(countdown_style))
@@ -356,7 +356,7 @@ countdown_style <- function(
   css_vars <- make_countdown_css_vars(.list = dots)
   declarations <- css(!!!css_vars)
 
-  tags$style(HTML(sprintf(":%s {%s}", .selector, declarations)))
+  tags$style(HTML(sprintf("%s {%s}", .selector, declarations)))
 }
 
 make_countdown_css_vars <- function(..., .list = list()) {

diff --git a/r/man/countdown-package.Rd b/r/man/countdown-package.Rd
diff --git a/r/man/countdown.Rd b/r/man/countdown.Rd