From 320a9d301fe00f5717c2b99e4a8e197702bedfae Mon Sep 17 00:00:00 2001 From: Stefan Kuethe Date: Sat, 21 Sep 2024 21:44:10 +0200 Subject: [PATCH] Change dontrun to donttest --- R/context_calls.R | 16 ++++++++-------- R/tabulator_context.R | 2 +- man/add_row.Rd | 2 +- man/delete_selected_rows.Rd | 2 +- man/redo.Rd | 2 +- man/tabulatorContext.Rd | 2 +- man/trigger_download.Rd | 2 +- man/trigger_get_data.Rd | 2 +- man/trigger_get_sheet_data.Rd | 2 +- man/undo.Rd | 2 +- 10 files changed, 17 insertions(+), 17 deletions(-) diff --git a/R/context_calls.R b/R/context_calls.R index cdbf16e..fce7f74 100644 --- a/R/context_calls.R +++ b/R/context_calls.R @@ -8,7 +8,7 @@ #' @param file_name File name. Set to `"data.{type}"` if `file_name = NULL`. #' @returns A [tabulatorContext()] object #' @examples -#' \dontrun{ +#' \donttest{ #' tabulatorContext("table") |> #' trigger_download("csv", "table-data.csv") #' } @@ -25,7 +25,7 @@ trigger_download <- function(ctx, type = c("csv", "json", "xlsx"), file_name = N #' Submit data to R #' @inherit trigger_download params return #' @examples -#' \dontrun{ +#' \donttest{ #' tabulatorContext("table") |> #' trigger_get_data() #' } @@ -38,7 +38,7 @@ trigger_get_data <- function(ctx) { #' @inherit trigger_download params return #' @param row (list): row data or \code{NULL} to add an empty row #' @examples -#' \dontrun{ +#' \donttest{ #' tabulatorContext("table") |> #' add_row() #' } @@ -50,7 +50,7 @@ add_row <- function(ctx, row = NULL) { #' Delete selected rows from table #' @inherit trigger_download params return #' @examples -#' \dontrun{ +#' \donttest{ #' tabulatorContext("table") |> #' delete_selected_rows() #' } @@ -61,14 +61,14 @@ delete_selected_rows <- function(ctx) { # TODO: Test bindings delete_row <- function(ctx) { - print("Not implemented yet") + message("Not implemented yet") return(ctx) } #' Undo changes #' @inherit trigger_download params return #' @examples -#' \dontrun{ +#' \donttest{ #' tabulatorContext("table") |> #' undo() #' } @@ -80,7 +80,7 @@ undo <- function(ctx) { #' Redo changes #' @inherit trigger_download params return #' @examples -#' \dontrun{ +#' \donttest{ #' tabulatorContext("table") |> #' redo() #' } @@ -92,7 +92,7 @@ redo <- function(ctx) { #' Submit sheet data to R #' @inherit trigger_download params return #' @examples -#' \dontrun{ +#' \donttest{ #' tabulatorContext("table") |> #' trigger_get_sheet_data() #' } diff --git a/R/tabulator_context.R b/R/tabulator_context.R index d2ec1f8..f082969 100644 --- a/R/tabulator_context.R +++ b/R/tabulator_context.R @@ -22,7 +22,7 @@ invoke_method <- function(widget, method_name, ...) { #' @param session A shiny session object. #' @returns A context object that can be used to interact with a [tabulator()] HTML widget #' @examples -#' \dontrun{ +#' \donttest{ #' tabulatorContext("table") |> #' trigger_download("csv") #' } diff --git a/man/add_row.Rd b/man/add_row.Rd index 696ad78..a475217 100644 --- a/man/add_row.Rd +++ b/man/add_row.Rd @@ -18,7 +18,7 @@ A \code{\link[=tabulatorContext]{tabulatorContext()}} object Add row to table } \examples{ -\dontrun{ +\donttest{ tabulatorContext("table") |> add_row() } diff --git a/man/delete_selected_rows.Rd b/man/delete_selected_rows.Rd index 5876910..bc120a6 100644 --- a/man/delete_selected_rows.Rd +++ b/man/delete_selected_rows.Rd @@ -16,7 +16,7 @@ A \code{\link[=tabulatorContext]{tabulatorContext()}} object Delete selected rows from table } \examples{ -\dontrun{ +\donttest{ tabulatorContext("table") |> delete_selected_rows() } diff --git a/man/redo.Rd b/man/redo.Rd index a56a0a1..f6816f2 100644 --- a/man/redo.Rd +++ b/man/redo.Rd @@ -16,7 +16,7 @@ A \code{\link[=tabulatorContext]{tabulatorContext()}} object Redo changes } \examples{ -\dontrun{ +\donttest{ tabulatorContext("table") |> redo() } diff --git a/man/tabulatorContext.Rd b/man/tabulatorContext.Rd index e4ca6e1..dd9fa2e 100644 --- a/man/tabulatorContext.Rd +++ b/man/tabulatorContext.Rd @@ -21,7 +21,7 @@ Context object to update a \code{tabulator()} HTML widget Makes it possible to update your \code{\link[=tabulator]{tabulator()}} HTML widget in Shiny apps. } \examples{ -\dontrun{ +\donttest{ tabulatorContext("table") |> trigger_download("csv") } diff --git a/man/trigger_download.Rd b/man/trigger_download.Rd index dbdf140..e0382f4 100644 --- a/man/trigger_download.Rd +++ b/man/trigger_download.Rd @@ -24,7 +24,7 @@ If you want to support \code{xlsx} downloads, you need to include the \href{https://sheetjs.com/}{sheetjs} HTML dependency with \code{tabulator(..., sheetjs = TRUE)}. } \examples{ -\dontrun{ +\donttest{ tabulatorContext("table") |> trigger_download("csv", "table-data.csv") } diff --git a/man/trigger_get_data.Rd b/man/trigger_get_data.Rd index dd4ad38..daea9d1 100644 --- a/man/trigger_get_data.Rd +++ b/man/trigger_get_data.Rd @@ -16,7 +16,7 @@ A \code{\link[=tabulatorContext]{tabulatorContext()}} object Submit data to R } \examples{ -\dontrun{ +\donttest{ tabulatorContext("table") |> trigger_get_data() } diff --git a/man/trigger_get_sheet_data.Rd b/man/trigger_get_sheet_data.Rd index 7731082..de5cb58 100644 --- a/man/trigger_get_sheet_data.Rd +++ b/man/trigger_get_sheet_data.Rd @@ -16,7 +16,7 @@ A \code{\link[=tabulatorContext]{tabulatorContext()}} object Submit sheet data to R } \examples{ -\dontrun{ +\donttest{ tabulatorContext("table") |> trigger_get_sheet_data() } diff --git a/man/undo.Rd b/man/undo.Rd index cbb938b..071ff42 100644 --- a/man/undo.Rd +++ b/man/undo.Rd @@ -16,7 +16,7 @@ A \code{\link[=tabulatorContext]{tabulatorContext()}} object Undo changes } \examples{ -\dontrun{ +\donttest{ tabulatorContext("table") |> undo() }