fix lintr

insightsengineering · Oct 16, 2023 · 27d061d · 27d061d
1 parent 5aedee9
commit 27d061d
Show file tree

Hide file tree

Showing 2 changed files with 11 additions and 3 deletions.
diff --git a/R/tm_landing_popup.R b/R/tm_landing_popup.R
@@ -32,7 +32,10 @@
 #'   extra_server = teal.modules.general::landing_popup(
 #'     title = "Welcome",
 #'     content = div(tags$b("A place for the welcome message or a disclaimer statement.", style = "color: red;")),
-#'     buttons = tagList(modalButton("Proceed"), actionButton("close", "Read more", onclick = "window.open('http://google.com', '_blank')"))
+#'     buttons = tagList(
+#'       modalButton("Proceed"),
+#'       actionButton("close", "Read more", onclick = "window.open('http://google.com', '_blank')")
+#'     )
 #'   )
 #' )
 #'
@@ -43,7 +46,9 @@
 #' @export
 landing_popup <- function(title = NULL, content = NULL, buttons = modalButton("Accept")) {
   checkmate::assert_string(title, null.ok = TRUE)
-  checkmate::assert_multi_class(content, classes = c("character", "shiny.tag", "shiny.tag.list", "html"), null.ok = TRUE)
+  checkmate::assert_multi_class(
+    content, classes = c("character", "shiny.tag", "shiny.tag.list", "html"), null.ok = TRUE
+  )
   checkmate::assert_multi_class(buttons, classes = c("shiny.tag", "shiny.tag.list"), null.ok = TRUE)
 
   showModal(

diff --git a/man/landing_popup.Rd b/man/landing_popup.Rd