R-rmarkdown/0009-Skip-shiny-tests.patch

45 lines
1.3 KiB
Diff

From 775c6e4ee8ce8afdec6a5c5dd810bd4771ea7eb6 Mon Sep 17 00:00:00 2001
From: Elliott Sales de Andrade <quantum.analyst@gmail.com>
Date: Sat, 21 Apr 2018 06:25:19 -0400
Subject: [PATCH 9/9] Skip shiny tests.
These would cause a dependency loop.
Signed-off-by: Elliott Sales de Andrade <quantum.analyst@gmail.com>
---
tests/testthat/test-params.R | 4 ++++
1 file changed, 4 insertions(+)
diff --git a/tests/testthat/test-params.R b/tests/testthat/test-params.R
index f27360f1..a6635f00 100644
--- a/tests/testthat/test-params.R
+++ b/tests/testthat/test-params.R
@@ -32,6 +32,7 @@ test_that("setting of params works", {
test_that("params render their UI", {
skip_on_cran()
+ skip_if_not_installed("shiny")
# file input is always NULL
ui <- params_value_to_ui(shiny::fileInput, "anything", TRUE)
@@ -59,6 +60,8 @@ test_that("params render their UI", {
})
test_that("parameters are configurable", {
+ skip_if_not_installed("shiny")
+
# Unknown input types are not configurable.
expect_error(params_configurable(list(
input = "unsupported")))
@@ -112,6 +115,7 @@ test_that("parameters are configurable", {
test_that("params hidden w/o show_default", {
skip_on_cran()
+ skip_if_not_installed("shiny")
# file input is always NULL
ui <- params_value_to_ui(shiny::fileInput, "anything", FALSE)
--
2.17.1