test f7Chip

RinteRface · Mar 15, 2024 · cae108a · cae108a
1 parent b4affa8
commit cae108a
Show file tree

Hide file tree

Showing 5 changed files with 41 additions and 4 deletions.
diff --git a/R/f7Button.R b/R/f7Button.R
@@ -98,6 +98,7 @@ updateF7Button <- function(inputId, label = NULL, color = NULL,
 #' @param container `r lifecycle::badge("deprecated")`:
 #' removed from Framework7.
 #' @inheritParams f7Button
+#' @inheritParams f7Block
 #'
 #' @rdname button
 #'

diff --git a/R/f7Page.R b/R/f7Page.R
@@ -486,8 +486,17 @@ f7TabLayout <- function(..., navbar, messagebar = NULL, panels = NULL) {
 #'           theme = "dark",
 #'           f7PanelMenu(
 #'             id = "menu",
-#'             f7PanelItem(tabName = "tab1", title = "Tab 1", icon = f7Icon("envelope"), active = TRUE),
-#'             f7PanelItem(tabName = "tab2", title = "Tab 2", icon = f7Icon("house"))
+#'             f7PanelItem(
+#'               tabName = "tab1",
+#'               title = "Tab 1",
+#'               icon = f7Icon("envelope"),
+#'               active = TRUE
+#'             ),
+#'             f7PanelItem(
+#'               tabName = "tab2",
+#'               title = "Tab 2",
+#'               icon = f7Icon("house")
+#'             )
 #'           ),
 #'           uiOutput("selected_tab")
 #'         ),

diff --git a/man/button.Rd b/man/button.Rd
diff --git a/man/f7SplitLayout.Rd b/man/f7SplitLayout.Rd
diff --git a/tests/testthat/test-f7Chip.R b/tests/testthat/test-f7Chip.R
@@ -0,0 +1,16 @@
+test_that("chip works", {
+  expect_s3_class(f7Chip(), "shiny.tag")
+  expect_identical(f7Chip()$attribs$class, "chip")
+  expect_identical(
+    f7Chip(status = "green", outline = TRUE)$attribs$class,
+    "chip chip-outline color-green"
+  )
+
+  # With icon
+  chip_children <- dropNulls(
+    f7Chip(icon = f7Icon("plus_circle_fill"), iconStatus = "pink")$children
+  )
+  expect_length(chip_children, 2)
+  expect_identical(chip_children[[1]]$attribs$class, "chip-media bg-color-pink")
+  expect_identical(chip_children[[2]]$attribs$class, "chip-label")
+})