Update lifecycle badges (#375)

Part of insightsengineering/coredev-tasks#649

Current version 0.4.0 will be probably bumped to 0.4.1 or higher.
Removing all `experimental` badges added at 0.3.1 or before.

Removed `experimental` badges
- added 3 years ago in here   
    - #61
- in Load reporter added over a year ago in version 0.3.1
    - #251
- in `panel_item` added over a year ago in version 0.3.0
    - #247

Changed `deprecated_soft` to `depreacated_stop`
- `reporter_previewer_deprecated` (added 3 years ago in
#61)

---------

Co-authored-by: github-actions <41898282+github-actions[bot]@users.noreply.github.com>

Author: m7pr

R/AddCardModule.R

@@ -1,6 +1,6 @@
 #' Add card button module
 #'
-#' @description `r lifecycle::badge("experimental")`
+#' @description
 #'
 #' Provides a button to add views/cards to a report.
 #'

R/DownloadModule.R

@@ -1,6 +1,6 @@
 #' Download report button module
 #'
-#' @description `r lifecycle::badge("experimental")`
+#' @description
 #'
 #' Provides a button that triggers downloading a report.
 #'

R/LoadReporterModule.R

@@ -1,6 +1,6 @@
 #' Load `Reporter` button module
 #'
-#' @description `r lifecycle::badge("experimental")`
+#' @description
 #'
 #' Provides a button to upload `ReporterCard`(s) to the `Reporter`.
 #'

R/Previewer.R

@@ -1,7 +1,6 @@
 #' Show report previewer button module
 #'
 #' @description `r lifecycle::badge("experimental")`
-#'
 #' Provides a button that triggers showing the report preview in a modal.
 #'
 #' For more details see the vignette: `vignette("previewerReporter", "teal.reporter")`.
@@ -15,38 +14,6 @@
 #' @return `NULL`.
 NULL
 
-#' Report previewer module
-#'
-#' @description `r lifecycle::badge("deprecated")`
-#'
-#' Module offers functionalities to visualize, manipulate,
-#' and interact with report cards that have been added to a report.
-#' It includes a previewer interface to see the cards and options to modify the report before downloading.
-#'
-#' Cards are saved by the `shiny` bookmarking mechanism.
-#'
-#' For more details see the vignette: `vignette("previewerReporter", "teal.reporter")`.
-#'
-#' This function is deprecated and will be removed in the next release.
-#' Please use `preview_report_button_ui()` and `preview_report_button_srv()`
-#' to create a preview button that opens a modal with the report preview.
-#'
-#' @details `r global_knitr_details()`
-#'
-#' @name reporter_previewer_deprecated
-#'
-#' @param id (`character(1)`) `shiny` module instance id.
-#' @param reporter (`Reporter`) instance.
-#' @param global_knitr (`list`) of `knitr` parameters (passed to `knitr::opts_chunk$set`)
-#'  for customizing the rendering process.
-#' @param previewer_buttons (`character`) set of modules to include with `c("download", "load", "reset")` possible
-#' values and `"download"` is required.
-#' Default `c("download", "load", "reset")`
-#' @inheritParams reporter_download_inputs
-#'
-#' @return `NULL`.
-NULL
-
 #' @rdname reporter_previewer
 #' @export
 preview_report_button_ui <- function(id, label = "Preview Report") {
@@ -111,12 +78,48 @@ preview_report_button_srv <- function(id, reporter) {
   })
 }
 
+
+# deprecated ------------------------------------------------------------------------------------------------------
+
+
+#' Report previewer module
+#'
+#' @description `r lifecycle::badge("deprecated")`
+#'
+#' Module offers functionalities to visualize, manipulate,
+#' and interact with report cards that have been added to a report.
+#' It includes a previewer interface to see the cards and options to modify the report before downloading.
+#'
+#' Cards are saved by the `shiny` bookmarking mechanism.
+#'
+#' For more details see the vignette: `vignette("previewerReporter", "teal.reporter")`.
+#'
+#' This function is deprecated and will be removed in the next release.
+#' Please use `preview_report_button_ui()` and `preview_report_button_srv()`
+#' to create a preview button that opens a modal with the report preview.
+#'
+#' @details `r global_knitr_details()`
+#'
+#' @name reporter_previewer_deprecated
+#'
+#' @param id (`character(1)`) `shiny` module instance id.
+#' @param reporter (`Reporter`) instance.
+#' @param global_knitr (`list`) of `knitr` parameters (passed to `knitr::opts_chunk$set`)
+#'  for customizing the rendering process.
+#' @param previewer_buttons (`character`) set of modules to include with `c("download", "load", "reset")` possible
+#' values and `"download"` is required.
+#' Default `c("download", "load", "reset")`
+#' @inheritParams reporter_download_inputs
+#'
+#' @return `NULL`.
+NULL
+
 #' @rdname reporter_previewer_deprecated
 #' @export
 reporter_previewer_ui <- function(id) {
   ns <- shiny::NS(id)
   lifecycle::deprecate_soft(
-    when = "",
+    when = "0.4.1",
     what = "reporter_previewer_ui()",
     details = paste(
       "Calling `reporter_previewer_ui()` is deprecated and will be removed in the next release.\n",
@@ -152,7 +155,7 @@ reporter_previewer_srv <- function(id,
                                    rmd_yaml_args = getOption("teal.reporter.rmd_yaml_args"),
                                    previewer_buttons = c("download", "load", "reset")) {
   lifecycle::deprecate_soft(
-    when = "",
+    when = "0.4.1",
     what = "reporter_previewer_srv()",
     details = paste(
       "Calling `reporter_previewer_srv()` is deprecated and will be removed in the next release.\n",
@@ -200,6 +203,9 @@ reporter_previewer_srv <- function(id,
   })
 }
 
+
+# reporter_previewer_content --------------------------------------------------------------------------------------
+
 #' @keywords internal
 reporter_previewer_content_ui <- function(id) {
   shiny::uiOutput(shiny::NS(id, "pcards"))
@@ -322,29 +328,3 @@ block_to_html <- function(b) {
     stop("Unknown block class")
   }
 }
-
-#' @noRd
-#' @keywords internal
-previewer_collapse_item <- function(idx, card_name, card_blocks) {
-  htmltools::tagAppendChildren(
-    tag = bslib::accordion_panel(
-      title = paste0("Card ", idx, ": ", card_name),
-      shiny::tags$div(
-        id = paste0("card", idx),
-        lapply(
-          card_blocks,
-          function(b) {
-            block_to_html(b)
-          }
-        )
-      )
-    ),
-    .cssSelector = ".accordion-header",
-    shiny::actionButton(
-      inputId = paste0("card_remove_id_", idx),
-      label = "Remove card",
-      class = "card_remove_id",
-      `data-cardid` = idx
-    )
-  )
-}

R/ReportCard.R

@@ -1,7 +1,7 @@
 #' @title `ReportCard`: An `R6` class for building report elements
 #' @docType class
 #'
-#' @description `r lifecycle::badge("experimental")`
+#' @description
 #'
 #' This `R6` class that supports creating a report card containing text, plot, table and
 #' metadata blocks that can be appended and rendered to form a report output from a `shiny` app.

R/Reporter.R

@@ -1,6 +1,6 @@
 #' @title `Reporter`: An `R6` class for managing report cards
 #' @docType class
-#' @description `r lifecycle::badge("experimental")`
+#' @description
 #'
 #' This `R6` class is designed to store and manage report cards,
 #' facilitating the creation, manipulation, and serialization of report-related data.

R/ResetModule.R

@@ -1,6 +1,6 @@
 #' Reset report button module
 #'
-#' @description `r lifecycle::badge("experimental")`
+#' @description
 #'
 #' Provides a button that triggers resetting the report content.
 #'

R/SimpleReporter.R

@@ -1,6 +1,6 @@
 #' Simple reporter module
 #'
-#' @description `r lifecycle::badge("experimental")`
+#' @description
 #'
 #' Module provides compact UI and server functions for managing a report in a `shiny` app.
 #' This module combines functionalities for [adding cards to a report][add_card_button],

R/teal.reporter.R

@@ -7,7 +7,6 @@
 
 #' @importFrom checkmate assert_string
 #' @importFrom grid grid.newpage
-#' @importFrom lifecycle badge
 #' @importFrom R6 R6Class
 #' @importFrom rmarkdown render
 #' @importFrom yaml as.yaml

R/utils.R

@@ -1,6 +1,5 @@
 #' Panel group widget
 #'
-#' `r lifecycle::badge("experimental")`
 #'
 #' @param title (`character`) title of panel
 #' @param ... content of panel