Last updated on 2025-12-08 13:48:55 CET.
| Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
|---|---|---|---|---|---|---|
| r-devel-linux-x86_64-debian-clang | 0.5.0 | 4.58 | 78.04 | 82.62 | OK | |
| r-devel-linux-x86_64-debian-gcc | 0.5.1 | 2.96 | 56.66 | 59.62 | OK | |
| r-devel-linux-x86_64-fedora-clang | 0.5.1 | 12.00 | 113.05 | 125.05 | ERROR | |
| r-devel-linux-x86_64-fedora-gcc | 0.5.1 | 21.00 | 117.60 | 138.60 | ERROR | |
| r-devel-windows-x86_64 | 0.5.0 | 10.00 | 98.00 | 108.00 | OK | |
| r-patched-linux-x86_64 | 0.5.1 | 4.61 | 71.99 | 76.60 | OK | |
| r-release-linux-x86_64 | 0.5.1 | 4.60 | 72.13 | 76.73 | OK | |
| r-release-macos-arm64 | 0.5.1 | 1.00 | 30.00 | 31.00 | OK | |
| r-release-macos-x86_64 | 0.5.1 | 4.00 | 87.00 | 91.00 | OK | |
| r-release-windows-x86_64 | 0.5.1 | 7.00 | 97.00 | 104.00 | OK | |
| r-oldrel-macos-arm64 | 0.5.1 | 1.00 | 32.00 | 33.00 | OK | |
| r-oldrel-macos-x86_64 | 0.5.1 | 4.00 | 102.00 | 106.00 | OK | |
| r-oldrel-windows-x86_64 | 0.5.1 | 9.00 | 117.00 | 126.00 | OK |
Version: 0.5.1
Check: tests
Result: ERROR
Running ‘testthat.R’ [28s/36s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> pkg_name <- "teal.widgets"
> library(pkg_name, character.only = TRUE)
> if (!is.null(requireNamespace("testthat"))) {
+ library(testthat)
+ test_check(pkg_name)
+ } else {
+ message("Please install testthat to run tests")
+ }
Loading required namespace: testthat
Loading required package: shiny
Saving _problems/test-table_with_settings-39.R
Saving _problems/test-table_with_settings-65.R
Saving _problems/test-table_with_settings-83.R
Saving _problems/test-table_with_settings-102.R
Saving _problems/test-table_with_settings-121.R
Saving _problems/test-table_with_settings-135.R
Saving _problems/test-table_with_settings-158.R
[ FAIL 9 | WARN 0 | SKIP 30 | PASS 225 ]
══ Skipped tests (30) ══════════════════════════════════════════════════════════
• On CRAN (3): 'test-optionalSliderInputValMinMax_ui.R:37:1',
'test-verbatim_popup_ui.R:153:1', 'test-white_small_well.R:7:1'
• testing depth 3 is below current testing specification 5 (27):
'test-draggable_buckets.R:19:5', 'test-draggable_buckets.R:42:5',
'test-draggable_buckets.R:68:5', 'test-get_dt_rows_ui.R:48:5',
'test-optionalSelectInput_ui.R:95:5',
'test-optionalSliderInputValMinMax_ui.R:16:5',
'test-plot_with_settings_ui.R:110:5', 'test-plot_with_settings_ui.R:133:5',
'test-plot_with_settings_ui.R:196:5', 'test-plot_with_settings_ui.R:238:5',
'test-plot_with_settings_ui.R:278:5', 'test-plot_with_settings_ui.R:323:5',
'test-plot_with_settings_ui.R:348:5', 'test-plot_with_settings_ui.R:369:3',
'test-plot_with_settings_ui.R:424:3', 'test-plot_with_settings_ui.R:447:3',
'test-plot_with_settings_ui.R:493:3', 'test-table_with_settings_ui.R:72:5',
'test-table_with_settings_ui.R:96:5', 'test-table_with_settings_ui.R:162:5',
'test-table_with_settings_ui.R:191:5', 'test-table_with_settings_ui.R:230:5',
'test-table_with_settings_ui.R:298:5', 'test-table_with_settings_ui.R:324:5',
'test-table_with_settings_ui.R:348:3', 'test-verbatim_popup_ui.R:33:5',
'test-verbatim_popup_ui.R:92:5'
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test-table_with_settings.R:29:7'): table_with_settings_srv: hiding works ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─shiny::testServer(...) at test-table_with_settings.R:25:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny:::with_otel_span_context(...)
13. │ │ │ │ └─base::force(expr)
14. │ │ │ ├─shiny::captureStackTraces(...)
15. │ │ │ │ └─promises::with_promise_domain(...)
16. │ │ │ │ └─domain$wrapSync(expr)
17. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
18. │ │ │ └─env$runWith(self, func)
19. │ │ │ └─shiny (local) contextFunc()
20. │ │ │ └─shiny::..stacktraceon..(expr)
21. │ │ ├─shiny::withReactiveDomain(...)
22. │ │ │ └─promises::with_promise_domain(...)
23. │ │ │ └─domain$wrapSync(expr)
24. │ │ │ └─base::force(expr)
25. │ │ └─withr::with_options(...)
26. │ │ └─base::force(code)
27. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
28. ├─testthat::expect_silent(output$table_out_modal$html) at test-table_with_settings.R:29:7
29. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
30. │ ├─testthat (local) .capture(...)
31. │ │ ├─withr::with_output_sink(...)
32. │ │ │ └─base::force(code)
33. │ │ ├─base::withCallingHandlers(...)
34. │ │ └─base::withVisible(code)
35. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
36. ├─output$table_out_modal
37. ├─shiny:::`$.shinyoutput`(output, table_out_modal)
38. │ └─.subset2(x, "impl")$getOutput(name)
39. │ └─base::stop(v$err)
40. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-table_with_settings.R:39:7'): table_with_settings_srv: return html table ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─shiny::testServer(...) at test-table_with_settings.R:35:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny:::with_otel_span_context(...)
13. │ │ │ │ └─base::force(expr)
14. │ │ │ ├─shiny::captureStackTraces(...)
15. │ │ │ │ └─promises::with_promise_domain(...)
16. │ │ │ │ └─domain$wrapSync(expr)
17. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
18. │ │ │ └─env$runWith(self, func)
19. │ │ │ └─shiny (local) contextFunc()
20. │ │ │ └─shiny::..stacktraceon..(expr)
21. │ │ ├─shiny::withReactiveDomain(...)
22. │ │ │ └─promises::with_promise_domain(...)
23. │ │ │ └─domain$wrapSync(expr)
24. │ │ │ └─base::force(expr)
25. │ │ └─withr::with_options(...)
26. │ │ └─base::force(code)
27. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
28. ├─testthat::expect_s3_class(output$table_out_modal$html, "html") at test-table_with_settings.R:39:7
29. │ └─testthat::quasi_label(enquo(object))
30. │ └─rlang::eval_bare(expr, quo_get_env(quo))
31. ├─output$table_out_modal
32. ├─shiny:::`$.shinyoutput`(output, table_out_modal)
33. │ └─.subset2(x, "impl")$getOutput(name)
34. │ └─base::stop(v$err)
35. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-table_with_settings.R:51:7'): table_with_settings_srv: expand works ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─shiny::testServer(...) at test-table_with_settings.R:46:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny:::with_otel_span_context(...)
13. │ │ │ │ └─base::force(expr)
14. │ │ │ ├─shiny::captureStackTraces(...)
15. │ │ │ │ └─promises::with_promise_domain(...)
16. │ │ │ │ └─domain$wrapSync(expr)
17. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
18. │ │ │ └─env$runWith(self, func)
19. │ │ │ └─shiny (local) contextFunc()
20. │ │ │ └─shiny::..stacktraceon..(expr)
21. │ │ ├─shiny::withReactiveDomain(...)
22. │ │ │ └─promises::with_promise_domain(...)
23. │ │ │ └─domain$wrapSync(expr)
24. │ │ │ └─base::force(expr)
25. │ │ └─withr::with_options(...)
26. │ │ └─base::force(code)
27. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
28. ├─testthat::expect_silent(output$table_out_modal) at test-table_with_settings.R:51:7
29. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
30. │ ├─testthat (local) .capture(...)
31. │ │ ├─withr::with_output_sink(...)
32. │ │ │ └─base::force(code)
33. │ │ ├─base::withCallingHandlers(...)
34. │ │ └─base::withVisible(code)
35. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
36. ├─output$table_out_modal
37. ├─shiny:::`$.shinyoutput`(output, table_out_modal)
38. │ └─.subset2(x, "impl")$getOutput(name)
39. │ └─base::stop(v$err)
40. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-table_with_settings.R:65:9'): type_download_srv_table: downloading different output types, custom name ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─shiny::testServer(...) at test-table_with_settings.R:57:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny:::with_otel_span_context(...)
13. │ │ │ │ └─base::force(expr)
14. │ │ │ ├─shiny::captureStackTraces(...)
15. │ │ │ │ └─promises::with_promise_domain(...)
16. │ │ │ │ └─domain$wrapSync(expr)
17. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
18. │ │ │ └─env$runWith(self, func)
19. │ │ │ └─shiny (local) contextFunc()
20. │ │ │ └─shiny::..stacktraceon..(expr)
21. │ │ ├─shiny::withReactiveDomain(...)
22. │ │ │ └─promises::with_promise_domain(...)
23. │ │ │ └─domain$wrapSync(expr)
24. │ │ │ └─base::force(expr)
25. │ │ └─withr::with_options(...)
26. │ │ └─base::force(code)
27. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
28. ├─testthat::expect_true(file.exists(output$data_download)) at test-table_with_settings.R:65:9
29. │ └─testthat::quasi_label(enquo(object), label)
30. │ └─rlang::eval_bare(expr, quo_get_env(quo))
31. ├─base::file.exists(output$data_download)
32. ├─output$data_download
33. ├─shiny:::`$.shinyoutput`(output, data_download)
34. │ └─.subset2(x, "impl")$getOutput(name)
35. │ └─private$renderFile(self$ns(name), download)
36. │ └─download$content(file)
37. │ ├─rtables::export_as_txt(...)
38. │ │ └─formatters:::.is_list_of_tables_or_listings(x)
39. │ │ └─methods::is(a_list, "list")
40. │ └─shiny (local) table_reactive()
41. │ └─base::stop(.value)
42. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-table_with_settings.R:83:9'): type_download_srv_table: downloading different output types, no name ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─shiny::testServer(...) at test-table_with_settings.R:76:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny:::with_otel_span_context(...)
13. │ │ │ │ └─base::force(expr)
14. │ │ │ ├─shiny::captureStackTraces(...)
15. │ │ │ │ └─promises::with_promise_domain(...)
16. │ │ │ │ └─domain$wrapSync(expr)
17. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
18. │ │ │ └─env$runWith(self, func)
19. │ │ │ └─shiny (local) contextFunc()
20. │ │ │ └─shiny::..stacktraceon..(expr)
21. │ │ ├─shiny::withReactiveDomain(...)
22. │ │ │ └─promises::with_promise_domain(...)
23. │ │ │ └─domain$wrapSync(expr)
24. │ │ │ └─base::force(expr)
25. │ │ └─withr::with_options(...)
26. │ │ └─base::force(code)
27. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
28. ├─testthat::expect_true(file.exists(output$data_download)) at test-table_with_settings.R:83:9
29. │ └─testthat::quasi_label(enquo(object), label)
30. │ └─rlang::eval_bare(expr, quo_get_env(quo))
31. ├─base::file.exists(output$data_download)
32. ├─output$data_download
33. ├─shiny:::`$.shinyoutput`(output, data_download)
34. │ └─.subset2(x, "impl")$getOutput(name)
35. │ └─private$renderFile(self$ns(name), download)
36. │ └─download$content(file)
37. │ ├─rtables::export_as_txt(...)
38. │ │ └─formatters:::.is_list_of_tables_or_listings(x)
39. │ │ └─methods::is(a_list, "list")
40. │ └─shiny (local) table_reactive()
41. │ └─base::stop(.value)
42. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-table_with_settings.R:102:9'): type_download_srv_table: downloading different output types, pagination ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─shiny::testServer(...) at test-table_with_settings.R:93:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny:::with_otel_span_context(...)
13. │ │ │ │ └─base::force(expr)
14. │ │ │ ├─shiny::captureStackTraces(...)
15. │ │ │ │ └─promises::with_promise_domain(...)
16. │ │ │ │ └─domain$wrapSync(expr)
17. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
18. │ │ │ └─env$runWith(self, func)
19. │ │ │ └─shiny (local) contextFunc()
20. │ │ │ └─shiny::..stacktraceon..(expr)
21. │ │ ├─shiny::withReactiveDomain(...)
22. │ │ │ └─promises::with_promise_domain(...)
23. │ │ │ └─domain$wrapSync(expr)
24. │ │ │ └─base::force(expr)
25. │ │ └─withr::with_options(...)
26. │ │ └─base::force(code)
27. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
28. ├─testthat::expect_true(file.exists(output$data_download)) at test-table_with_settings.R:102:9
29. │ └─testthat::quasi_label(enquo(object), label)
30. │ └─rlang::eval_bare(expr, quo_get_env(quo))
31. ├─base::file.exists(output$data_download)
32. ├─output$data_download
33. ├─shiny:::`$.shinyoutput`(output, data_download)
34. │ └─.subset2(x, "impl")$getOutput(name)
35. │ └─private$renderFile(self$ns(name), download)
36. │ └─download$content(file)
37. │ ├─rtables::export_as_txt(...)
38. │ │ └─formatters:::.is_list_of_tables_or_listings(x)
39. │ │ └─methods::is(a_list, "list")
40. │ └─shiny (local) table_reactive()
41. │ └─base::stop(.value)
42. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-table_with_settings.R:121:9'): type_download_srv_table: pagination, lpp to small ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─shiny::testServer(...) at test-table_with_settings.R:113:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny:::with_otel_span_context(...)
13. │ │ │ │ └─base::force(expr)
14. │ │ │ ├─shiny::captureStackTraces(...)
15. │ │ │ │ └─promises::with_promise_domain(...)
16. │ │ │ │ └─domain$wrapSync(expr)
17. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
18. │ │ │ └─env$runWith(self, func)
19. │ │ │ └─shiny (local) contextFunc()
20. │ │ │ └─shiny::..stacktraceon..(expr)
21. │ │ ├─shiny::withReactiveDomain(...)
22. │ │ │ └─promises::with_promise_domain(...)
23. │ │ │ └─domain$wrapSync(expr)
24. │ │ │ └─base::force(expr)
25. │ │ └─withr::with_options(...)
26. │ │ └─base::force(code)
27. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
28. ├─testthat::expect_error(output$data_download, "Lines of repeated context") at test-table_with_settings.R:121:9
29. │ └─testthat:::expect_condition_matching_(...)
30. │ └─testthat:::quasi_capture(...)
31. │ ├─testthat (local) .capture(...)
32. │ │ └─base::withCallingHandlers(...)
33. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
34. ├─output$data_download
35. ├─shiny:::`$.shinyoutput`(output, data_download)
36. │ └─.subset2(x, "impl")$getOutput(name)
37. │ └─private$renderFile(self$ns(name), download)
38. │ └─download$content(file)
39. │ ├─rtables::export_as_txt(...)
40. │ │ └─formatters:::.is_list_of_tables_or_listings(x)
41. │ │ └─methods::is(a_list, "list")
42. │ └─shiny (local) table_reactive()
43. │ └─base::stop(.value)
44. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-table_with_settings.R:135:7'): type_download_srv_table: content of the table, csv ──
Error in `(function (cond) .Internal(C_tryCatchHelper(addr, 1L, cond)))(structure(list(message = "'arg' must be of length 1", call = match.arg(round_type)), class = c("simpleError", "error", "condition")))`: error in evaluating the argument 'obj' in selecting a method for function 'matrix_form': 'arg' must be of length 1
Backtrace:
▆
1. ├─shiny::testServer(...) at test-table_with_settings.R:128:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny:::with_otel_span_context(...)
13. │ │ │ │ └─base::force(expr)
14. │ │ │ ├─shiny::captureStackTraces(...)
15. │ │ │ │ └─promises::with_promise_domain(...)
16. │ │ │ │ └─domain$wrapSync(expr)
17. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
18. │ │ │ └─env$runWith(self, func)
19. │ │ │ └─shiny (local) contextFunc()
20. │ │ │ └─shiny::..stacktraceon..(expr)
21. │ │ ├─shiny::withReactiveDomain(...)
22. │ │ │ └─promises::with_promise_domain(...)
23. │ │ │ └─domain$wrapSync(expr)
24. │ │ │ └─base::force(expr)
25. │ │ └─withr::with_options(...)
26. │ │ └─base::force(code)
27. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
28. ├─utils::read.csv(output$data_download) at test-table_with_settings.R:135:7
29. │ └─utils::read.table(...)
30. ├─output$data_download
31. ├─shiny:::`$.shinyoutput`(output, data_download)
32. │ └─.subset2(x, "impl")$getOutput(name)
33. │ └─private$renderFile(self$ns(name), download)
34. │ └─download$content(file)
35. │ ├─rtables::matrix_form(table_reactive())
36. │ └─shiny (local) table_reactive()
37. │ └─base::stop(.value)
38. ├─base (local) `<fn>`(`<smplErrr>`)
39. └─base::.handleSimpleError(...)
40. └─shiny (local) h(simpleError(msg, call))
── Error ('test-table_with_settings.R:158:7'): type_download_srv_table: content of the table, txt ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─shiny::testServer(...) at test-table_with_settings.R:151:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny:::with_otel_span_context(...)
13. │ │ │ │ └─base::force(expr)
14. │ │ │ ├─shiny::captureStackTraces(...)
15. │ │ │ │ └─promises::with_promise_domain(...)
16. │ │ │ │ └─domain$wrapSync(expr)
17. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
18. │ │ │ └─env$runWith(self, func)
19. │ │ │ └─shiny (local) contextFunc()
20. │ │ │ └─shiny::..stacktraceon..(expr)
21. │ │ ├─shiny::withReactiveDomain(...)
22. │ │ │ └─promises::with_promise_domain(...)
23. │ │ │ └─domain$wrapSync(expr)
24. │ │ │ └─base::force(expr)
25. │ │ └─withr::with_options(...)
26. │ │ └─base::force(code)
27. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
28. ├─utils::read.delim(output$data_download, sep = "") at test-table_with_settings.R:158:7
29. │ └─utils::read.table(...)
30. ├─output$data_download
31. ├─shiny:::`$.shinyoutput`(output, data_download)
32. │ └─.subset2(x, "impl")$getOutput(name)
33. │ └─private$renderFile(self$ns(name), download)
34. │ └─download$content(file)
35. │ ├─rtables::export_as_txt(...)
36. │ │ └─formatters:::.is_list_of_tables_or_listings(x)
37. │ │ └─methods::is(a_list, "list")
38. │ └─shiny (local) table_reactive()
39. │ └─base::stop(.value)
40. └─shiny (local) `<fn>`(`<smplErrr>`)
[ FAIL 9 | WARN 0 | SKIP 30 | PASS 225 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-fedora-clang
Version: 0.5.1
Check: tests
Result: ERROR
Running ‘testthat.R’ [28s/57s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> pkg_name <- "teal.widgets"
> library(pkg_name, character.only = TRUE)
> if (!is.null(requireNamespace("testthat"))) {
+ library(testthat)
+ test_check(pkg_name)
+ } else {
+ message("Please install testthat to run tests")
+ }
Loading required namespace: testthat
Loading required package: shiny
Saving _problems/test-table_with_settings-39.R
Saving _problems/test-table_with_settings-65.R
Saving _problems/test-table_with_settings-83.R
Saving _problems/test-table_with_settings-102.R
Saving _problems/test-table_with_settings-121.R
Saving _problems/test-table_with_settings-135.R
Saving _problems/test-table_with_settings-158.R
[ FAIL 9 | WARN 0 | SKIP 30 | PASS 225 ]
══ Skipped tests (30) ══════════════════════════════════════════════════════════
• On CRAN (3): 'test-optionalSliderInputValMinMax_ui.R:37:1',
'test-verbatim_popup_ui.R:153:1', 'test-white_small_well.R:7:1'
• testing depth 3 is below current testing specification 5 (27):
'test-draggable_buckets.R:19:5', 'test-draggable_buckets.R:42:5',
'test-draggable_buckets.R:68:5', 'test-get_dt_rows_ui.R:48:5',
'test-optionalSelectInput_ui.R:95:5',
'test-optionalSliderInputValMinMax_ui.R:16:5',
'test-plot_with_settings_ui.R:110:5', 'test-plot_with_settings_ui.R:133:5',
'test-plot_with_settings_ui.R:196:5', 'test-plot_with_settings_ui.R:238:5',
'test-plot_with_settings_ui.R:278:5', 'test-plot_with_settings_ui.R:323:5',
'test-plot_with_settings_ui.R:348:5', 'test-plot_with_settings_ui.R:369:3',
'test-plot_with_settings_ui.R:424:3', 'test-plot_with_settings_ui.R:447:3',
'test-plot_with_settings_ui.R:493:3', 'test-table_with_settings_ui.R:72:5',
'test-table_with_settings_ui.R:96:5', 'test-table_with_settings_ui.R:162:5',
'test-table_with_settings_ui.R:191:5', 'test-table_with_settings_ui.R:230:5',
'test-table_with_settings_ui.R:298:5', 'test-table_with_settings_ui.R:324:5',
'test-table_with_settings_ui.R:348:3', 'test-verbatim_popup_ui.R:33:5',
'test-verbatim_popup_ui.R:92:5'
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test-table_with_settings.R:29:7'): table_with_settings_srv: hiding works ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─shiny::testServer(...) at test-table_with_settings.R:25:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny:::with_otel_span_context(...)
13. │ │ │ │ └─base::force(expr)
14. │ │ │ ├─shiny::captureStackTraces(...)
15. │ │ │ │ └─promises::with_promise_domain(...)
16. │ │ │ │ └─domain$wrapSync(expr)
17. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
18. │ │ │ └─env$runWith(self, func)
19. │ │ │ └─shiny (local) contextFunc()
20. │ │ │ └─shiny::..stacktraceon..(expr)
21. │ │ ├─shiny::withReactiveDomain(...)
22. │ │ │ └─promises::with_promise_domain(...)
23. │ │ │ └─domain$wrapSync(expr)
24. │ │ │ └─base::force(expr)
25. │ │ └─withr::with_options(...)
26. │ │ └─base::force(code)
27. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
28. ├─testthat::expect_silent(output$table_out_modal$html) at test-table_with_settings.R:29:7
29. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
30. │ ├─testthat (local) .capture(...)
31. │ │ ├─withr::with_output_sink(...)
32. │ │ │ └─base::force(code)
33. │ │ ├─base::withCallingHandlers(...)
34. │ │ └─base::withVisible(code)
35. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
36. ├─output$table_out_modal
37. ├─shiny:::`$.shinyoutput`(output, table_out_modal)
38. │ └─.subset2(x, "impl")$getOutput(name)
39. │ └─base::stop(v$err)
40. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-table_with_settings.R:39:7'): table_with_settings_srv: return html table ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─shiny::testServer(...) at test-table_with_settings.R:35:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny:::with_otel_span_context(...)
13. │ │ │ │ └─base::force(expr)
14. │ │ │ ├─shiny::captureStackTraces(...)
15. │ │ │ │ └─promises::with_promise_domain(...)
16. │ │ │ │ └─domain$wrapSync(expr)
17. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
18. │ │ │ └─env$runWith(self, func)
19. │ │ │ └─shiny (local) contextFunc()
20. │ │ │ └─shiny::..stacktraceon..(expr)
21. │ │ ├─shiny::withReactiveDomain(...)
22. │ │ │ └─promises::with_promise_domain(...)
23. │ │ │ └─domain$wrapSync(expr)
24. │ │ │ └─base::force(expr)
25. │ │ └─withr::with_options(...)
26. │ │ └─base::force(code)
27. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
28. ├─testthat::expect_s3_class(output$table_out_modal$html, "html") at test-table_with_settings.R:39:7
29. │ └─testthat::quasi_label(enquo(object))
30. │ └─rlang::eval_bare(expr, quo_get_env(quo))
31. ├─output$table_out_modal
32. ├─shiny:::`$.shinyoutput`(output, table_out_modal)
33. │ └─.subset2(x, "impl")$getOutput(name)
34. │ └─base::stop(v$err)
35. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-table_with_settings.R:51:7'): table_with_settings_srv: expand works ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─shiny::testServer(...) at test-table_with_settings.R:46:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny:::with_otel_span_context(...)
13. │ │ │ │ └─base::force(expr)
14. │ │ │ ├─shiny::captureStackTraces(...)
15. │ │ │ │ └─promises::with_promise_domain(...)
16. │ │ │ │ └─domain$wrapSync(expr)
17. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
18. │ │ │ └─env$runWith(self, func)
19. │ │ │ └─shiny (local) contextFunc()
20. │ │ │ └─shiny::..stacktraceon..(expr)
21. │ │ ├─shiny::withReactiveDomain(...)
22. │ │ │ └─promises::with_promise_domain(...)
23. │ │ │ └─domain$wrapSync(expr)
24. │ │ │ └─base::force(expr)
25. │ │ └─withr::with_options(...)
26. │ │ └─base::force(code)
27. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
28. ├─testthat::expect_silent(output$table_out_modal) at test-table_with_settings.R:51:7
29. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
30. │ ├─testthat (local) .capture(...)
31. │ │ ├─withr::with_output_sink(...)
32. │ │ │ └─base::force(code)
33. │ │ ├─base::withCallingHandlers(...)
34. │ │ └─base::withVisible(code)
35. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
36. ├─output$table_out_modal
37. ├─shiny:::`$.shinyoutput`(output, table_out_modal)
38. │ └─.subset2(x, "impl")$getOutput(name)
39. │ └─base::stop(v$err)
40. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-table_with_settings.R:65:9'): type_download_srv_table: downloading different output types, custom name ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─shiny::testServer(...) at test-table_with_settings.R:57:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny:::with_otel_span_context(...)
13. │ │ │ │ └─base::force(expr)
14. │ │ │ ├─shiny::captureStackTraces(...)
15. │ │ │ │ └─promises::with_promise_domain(...)
16. │ │ │ │ └─domain$wrapSync(expr)
17. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
18. │ │ │ └─env$runWith(self, func)
19. │ │ │ └─shiny (local) contextFunc()
20. │ │ │ └─shiny::..stacktraceon..(expr)
21. │ │ ├─shiny::withReactiveDomain(...)
22. │ │ │ └─promises::with_promise_domain(...)
23. │ │ │ └─domain$wrapSync(expr)
24. │ │ │ └─base::force(expr)
25. │ │ └─withr::with_options(...)
26. │ │ └─base::force(code)
27. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
28. ├─testthat::expect_true(file.exists(output$data_download)) at test-table_with_settings.R:65:9
29. │ └─testthat::quasi_label(enquo(object), label)
30. │ └─rlang::eval_bare(expr, quo_get_env(quo))
31. ├─base::file.exists(output$data_download)
32. ├─output$data_download
33. ├─shiny:::`$.shinyoutput`(output, data_download)
34. │ └─.subset2(x, "impl")$getOutput(name)
35. │ └─private$renderFile(self$ns(name), download)
36. │ └─download$content(file)
37. │ ├─rtables::export_as_txt(...)
38. │ │ └─formatters:::.is_list_of_tables_or_listings(x)
39. │ │ └─methods::is(a_list, "list")
40. │ └─shiny (local) table_reactive()
41. │ └─base::stop(.value)
42. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-table_with_settings.R:83:9'): type_download_srv_table: downloading different output types, no name ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─shiny::testServer(...) at test-table_with_settings.R:76:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny:::with_otel_span_context(...)
13. │ │ │ │ └─base::force(expr)
14. │ │ │ ├─shiny::captureStackTraces(...)
15. │ │ │ │ └─promises::with_promise_domain(...)
16. │ │ │ │ └─domain$wrapSync(expr)
17. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
18. │ │ │ └─env$runWith(self, func)
19. │ │ │ └─shiny (local) contextFunc()
20. │ │ │ └─shiny::..stacktraceon..(expr)
21. │ │ ├─shiny::withReactiveDomain(...)
22. │ │ │ └─promises::with_promise_domain(...)
23. │ │ │ └─domain$wrapSync(expr)
24. │ │ │ └─base::force(expr)
25. │ │ └─withr::with_options(...)
26. │ │ └─base::force(code)
27. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
28. ├─testthat::expect_true(file.exists(output$data_download)) at test-table_with_settings.R:83:9
29. │ └─testthat::quasi_label(enquo(object), label)
30. │ └─rlang::eval_bare(expr, quo_get_env(quo))
31. ├─base::file.exists(output$data_download)
32. ├─output$data_download
33. ├─shiny:::`$.shinyoutput`(output, data_download)
34. │ └─.subset2(x, "impl")$getOutput(name)
35. │ └─private$renderFile(self$ns(name), download)
36. │ └─download$content(file)
37. │ ├─rtables::export_as_txt(...)
38. │ │ └─formatters:::.is_list_of_tables_or_listings(x)
39. │ │ └─methods::is(a_list, "list")
40. │ └─shiny (local) table_reactive()
41. │ └─base::stop(.value)
42. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-table_with_settings.R:102:9'): type_download_srv_table: downloading different output types, pagination ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─shiny::testServer(...) at test-table_with_settings.R:93:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny:::with_otel_span_context(...)
13. │ │ │ │ └─base::force(expr)
14. │ │ │ ├─shiny::captureStackTraces(...)
15. │ │ │ │ └─promises::with_promise_domain(...)
16. │ │ │ │ └─domain$wrapSync(expr)
17. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
18. │ │ │ └─env$runWith(self, func)
19. │ │ │ └─shiny (local) contextFunc()
20. │ │ │ └─shiny::..stacktraceon..(expr)
21. │ │ ├─shiny::withReactiveDomain(...)
22. │ │ │ └─promises::with_promise_domain(...)
23. │ │ │ └─domain$wrapSync(expr)
24. │ │ │ └─base::force(expr)
25. │ │ └─withr::with_options(...)
26. │ │ └─base::force(code)
27. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
28. ├─testthat::expect_true(file.exists(output$data_download)) at test-table_with_settings.R:102:9
29. │ └─testthat::quasi_label(enquo(object), label)
30. │ └─rlang::eval_bare(expr, quo_get_env(quo))
31. ├─base::file.exists(output$data_download)
32. ├─output$data_download
33. ├─shiny:::`$.shinyoutput`(output, data_download)
34. │ └─.subset2(x, "impl")$getOutput(name)
35. │ └─private$renderFile(self$ns(name), download)
36. │ └─download$content(file)
37. │ ├─rtables::export_as_txt(...)
38. │ │ └─formatters:::.is_list_of_tables_or_listings(x)
39. │ │ └─methods::is(a_list, "list")
40. │ └─shiny (local) table_reactive()
41. │ └─base::stop(.value)
42. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-table_with_settings.R:121:9'): type_download_srv_table: pagination, lpp to small ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─shiny::testServer(...) at test-table_with_settings.R:113:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny:::with_otel_span_context(...)
13. │ │ │ │ └─base::force(expr)
14. │ │ │ ├─shiny::captureStackTraces(...)
15. │ │ │ │ └─promises::with_promise_domain(...)
16. │ │ │ │ └─domain$wrapSync(expr)
17. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
18. │ │ │ └─env$runWith(self, func)
19. │ │ │ └─shiny (local) contextFunc()
20. │ │ │ └─shiny::..stacktraceon..(expr)
21. │ │ ├─shiny::withReactiveDomain(...)
22. │ │ │ └─promises::with_promise_domain(...)
23. │ │ │ └─domain$wrapSync(expr)
24. │ │ │ └─base::force(expr)
25. │ │ └─withr::with_options(...)
26. │ │ └─base::force(code)
27. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
28. ├─testthat::expect_error(output$data_download, "Lines of repeated context") at test-table_with_settings.R:121:9
29. │ └─testthat:::expect_condition_matching_(...)
30. │ └─testthat:::quasi_capture(...)
31. │ ├─testthat (local) .capture(...)
32. │ │ └─base::withCallingHandlers(...)
33. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
34. ├─output$data_download
35. ├─shiny:::`$.shinyoutput`(output, data_download)
36. │ └─.subset2(x, "impl")$getOutput(name)
37. │ └─private$renderFile(self$ns(name), download)
38. │ └─download$content(file)
39. │ ├─rtables::export_as_txt(...)
40. │ │ └─formatters:::.is_list_of_tables_or_listings(x)
41. │ │ └─methods::is(a_list, "list")
42. │ └─shiny (local) table_reactive()
43. │ └─base::stop(.value)
44. └─shiny (local) `<fn>`(`<smplErrr>`)
── Error ('test-table_with_settings.R:135:7'): type_download_srv_table: content of the table, csv ──
Error in `(function (cond) .Internal(C_tryCatchHelper(addr, 1L, cond)))(structure(list(message = "'arg' must be of length 1", call = match.arg(round_type)), class = c("simpleError", "error", "condition")))`: error in evaluating the argument 'obj' in selecting a method for function 'matrix_form': 'arg' must be of length 1
Backtrace:
▆
1. ├─shiny::testServer(...) at test-table_with_settings.R:128:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny:::with_otel_span_context(...)
13. │ │ │ │ └─base::force(expr)
14. │ │ │ ├─shiny::captureStackTraces(...)
15. │ │ │ │ └─promises::with_promise_domain(...)
16. │ │ │ │ └─domain$wrapSync(expr)
17. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
18. │ │ │ └─env$runWith(self, func)
19. │ │ │ └─shiny (local) contextFunc()
20. │ │ │ └─shiny::..stacktraceon..(expr)
21. │ │ ├─shiny::withReactiveDomain(...)
22. │ │ │ └─promises::with_promise_domain(...)
23. │ │ │ └─domain$wrapSync(expr)
24. │ │ │ └─base::force(expr)
25. │ │ └─withr::with_options(...)
26. │ │ └─base::force(code)
27. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
28. ├─utils::read.csv(output$data_download) at test-table_with_settings.R:135:7
29. │ └─utils::read.table(...)
30. ├─output$data_download
31. ├─shiny:::`$.shinyoutput`(output, data_download)
32. │ └─.subset2(x, "impl")$getOutput(name)
33. │ └─private$renderFile(self$ns(name), download)
34. │ └─download$content(file)
35. │ ├─rtables::matrix_form(table_reactive())
36. │ └─shiny (local) table_reactive()
37. │ └─base::stop(.value)
38. ├─base (local) `<fn>`(`<smplErrr>`)
39. └─base::.handleSimpleError(...)
40. └─shiny (local) h(simpleError(msg, call))
── Error ('test-table_with_settings.R:158:7'): type_download_srv_table: content of the table, txt ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─shiny::testServer(...) at test-table_with_settings.R:151:3
2. │ ├─shiny:::withMockContext(...)
3. │ │ ├─shiny::isolate(...)
4. │ │ │ ├─shiny::..stacktraceoff..(...)
5. │ │ │ └─ctx$run(...)
6. │ │ │ ├─promises::with_promise_domain(...)
7. │ │ │ │ └─domain$wrapSync(expr)
8. │ │ │ ├─shiny::withReactiveDomain(...)
9. │ │ │ │ └─promises::with_promise_domain(...)
10. │ │ │ │ └─domain$wrapSync(expr)
11. │ │ │ │ └─base::force(expr)
12. │ │ │ ├─shiny:::with_otel_span_context(...)
13. │ │ │ │ └─base::force(expr)
14. │ │ │ ├─shiny::captureStackTraces(...)
15. │ │ │ │ └─promises::with_promise_domain(...)
16. │ │ │ │ └─domain$wrapSync(expr)
17. │ │ │ │ └─base::withCallingHandlers(expr, error = doCaptureStack)
18. │ │ │ └─env$runWith(self, func)
19. │ │ │ └─shiny (local) contextFunc()
20. │ │ │ └─shiny::..stacktraceon..(expr)
21. │ │ ├─shiny::withReactiveDomain(...)
22. │ │ │ └─promises::with_promise_domain(...)
23. │ │ │ └─domain$wrapSync(expr)
24. │ │ │ └─base::force(expr)
25. │ │ └─withr::with_options(...)
26. │ │ └─base::force(code)
27. │ └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
28. ├─utils::read.delim(output$data_download, sep = "") at test-table_with_settings.R:158:7
29. │ └─utils::read.table(...)
30. ├─output$data_download
31. ├─shiny:::`$.shinyoutput`(output, data_download)
32. │ └─.subset2(x, "impl")$getOutput(name)
33. │ └─private$renderFile(self$ns(name), download)
34. │ └─download$content(file)
35. │ ├─rtables::export_as_txt(...)
36. │ │ └─formatters:::.is_list_of_tables_or_listings(x)
37. │ │ └─methods::is(a_list, "list")
38. │ └─shiny (local) table_reactive()
39. │ └─base::stop(.value)
40. └─shiny (local) `<fn>`(`<smplErrr>`)
[ FAIL 9 | WARN 0 | SKIP 30 | PASS 225 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-fedora-gcc