Running 'testthat.R' [6s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > # This file is part of the standard setup for testthat.
  > # It is recommended that you do not modify it.
  > #
  > # Where should you do additional test configuration?
  > # Learn more about the roles of various files in:
  > # * https://r-pkgs.org/testing-design.html#sec-tests-files-overview
  > # * https://testthat.r-lib.org/articles/special-files.html
  > 
  > library(testthat)
  > library(blockr.dag)
  > 
  > test_check("blockr.dag")
  Loading required package: shiny
  Saving _problems/test-action-52.R
  Saving _problems/test-action-52.R
  Saving _problems/test-action-52.R
  Saving _problems/test-action-52.R
  Saving _problems/test-action-52.R
  Saving _problems/test-action-52.R
  Saving _problems/test-action-52.R
  Saving _problems/test-action-52.R
  [WARN][2026-04-21 12:04:34][blockr.dag] No inputs are available for block c.
  Saving _problems/test-action-81.R
  Saving _problems/test-action-82.R
  Saving _problems/test-action-83.R
  Saving _problems/test-action-84.R
  Saving _problems/test-action-85.R
  Saving _problems/test-action-86.R
  Saving _problems/test-action-87.R
  [WARN][2026-04-21 12:04:35][blockr.dag] No inputs are available for block b.
  [ FAIL 15 | WARN 0 | SKIP 1 | PASS 136 ]
  
  ══ Skipped tests (1) ═══════════════════════════════════════════════════════════
  • On CRAN (1): 'test-e2e.R:136:3'
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Failure ('test-action.R:52:3'): draw link action with valid target ──────────
  Expected `upd` to have length 1.
  Actual length: 0.
  Backtrace:
       ▆
    1. ├─blockr.dag (local) test_draw_link_action(g6_edge("a", "b"), 1L) at test-action.R:52:3
    2. │ └─shiny::testServer(...) at test-action.R:18:3
    3. │   ├─shiny:::withMockContext(...)
    4. │   │ ├─shiny::isolate(...)
    5. │   │ │ ├─shiny::..stacktraceoff..(...)
    6. │   │ │ └─ctx$run(...)
    7. │   │ │   ├─promises::with_promise_domain(...)
    8. │   │ │   │ └─domain$wrapSync(expr)
    9. │   │ │   ├─shiny::withReactiveDomain(...)
   10. │   │ │   │ └─promises::with_promise_domain(...)
   11. │   │ │   │   └─domain$wrapSync(expr)
   12. │   │ │   │     └─base::force(expr)
   13. │   │ │   ├─shiny:::with_otel_span_context(...)
   14. │   │ │   │ └─base::force(expr)
   15. │   │ │   ├─shiny::captureStackTraces(...)
   16. │   │ │   │ └─promises::with_promise_domain(...)
   17. │   │ │   │   └─domain$wrapSync(expr)
   18. │   │ │   │     └─base::withCallingHandlers(expr, error = doCaptureStack)
   19. │   │ │   └─env$runWith(self, func)
   20. │   │ │     └─shiny (local) contextFunc()
   21. │   │ │       └─shiny::..stacktraceon..(expr)
   22. │   │ ├─shiny::withReactiveDomain(...)
   23. │   │ │ └─promises::with_promise_domain(...)
   24. │   │ │   └─domain$wrapSync(expr)
   25. │   │ │     └─base::force(expr)
   26. │   │ └─withr::with_options(...)
   27. │   │   └─base::force(code)
   28. │   └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
   29. └─testthat::expect_length(upd, expected_updates) at test-action.R:34:7
  ── Failure ('test-action.R:52:3'): draw link action with valid target ──────────
  Expected `upd` to have names "links".
  Differences:
  `actual` is NULL
  `expected` is a character vector ('links')
  
  Backtrace:
       ▆
    1. ├─blockr.dag (local) test_draw_link_action(g6_edge("a", "b"), 1L) at test-action.R:52:3
    2. │ └─shiny::testServer(...) at test-action.R:18:3
    3. │   ├─shiny:::withMockContext(...)
    4. │   │ ├─shiny::isolate(...)
    5. │   │ │ ├─shiny::..stacktraceoff..(...)
    6. │   │ │ └─ctx$run(...)
    7. │   │ │   ├─promises::with_promise_domain(...)
    8. │   │ │   │ └─domain$wrapSync(expr)
    9. │   │ │   ├─shiny::withReactiveDomain(...)
   10. │   │ │   │ └─promises::with_promise_domain(...)
   11. │   │ │   │   └─domain$wrapSync(expr)
   12. │   │ │   │     └─base::force(expr)
   13. │   │ │   ├─shiny:::with_otel_span_context(...)
   14. │   │ │   │ └─base::force(expr)
   15. │   │ │   ├─shiny::captureStackTraces(...)
   16. │   │ │   │ └─promises::with_promise_domain(...)
   17. │   │ │   │   └─domain$wrapSync(expr)
   18. │   │ │   │     └─base::withCallingHandlers(expr, error = doCaptureStack)
   19. │   │ │   └─env$runWith(self, func)
   20. │   │ │     └─shiny (local) contextFunc()
   21. │   │ │       └─shiny::..stacktraceon..(expr)
   22. │   │ ├─shiny::withReactiveDomain(...)
   23. │   │ │ └─promises::with_promise_domain(...)
   24. │   │ │   └─domain$wrapSync(expr)
   25. │   │ │     └─base::force(expr)
   26. │   │ └─withr::with_options(...)
   27. │   │   └─base::force(code)
   28. │   └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
   29. └─testthat::expect_named(upd, "links") at test-action.R:37:9
  ── Failure ('test-action.R:52:3'): draw link action with valid target ──────────
  Expected `upd$links` to have length 1.
  Actual length: 0.
  Backtrace:
       ▆
    1. ├─blockr.dag (local) test_draw_link_action(g6_edge("a", "b"), 1L) at test-action.R:52:3
    2. │ └─shiny::testServer(...) at test-action.R:18:3
    3. │   ├─shiny:::withMockContext(...)
    4. │   │ ├─shiny::isolate(...)
    5. │   │ │ ├─shiny::..stacktraceoff..(...)
    6. │   │ │ └─ctx$run(...)
    7. │   │ │   ├─promises::with_promise_domain(...)
    8. │   │ │   │ └─domain$wrapSync(expr)
    9. │   │ │   ├─shiny::withReactiveDomain(...)
   10. │   │ │   │ └─promises::with_promise_domain(...)
   11. │   │ │   │   └─domain$wrapSync(expr)
   12. │   │ │   │     └─base::force(expr)
   13. │   │ │   ├─shiny:::with_otel_span_context(...)
   14. │   │ │   │ └─base::force(expr)
   15. │   │ │   ├─shiny::captureStackTraces(...)
   16. │   │ │   │ └─promises::with_promise_domain(...)
   17. │   │ │   │   └─domain$wrapSync(expr)
   18. │   │ │   │     └─base::withCallingHandlers(expr, error = doCaptureStack)
   19. │   │ │   └─env$runWith(self, func)
   20. │   │ │     └─shiny (local) contextFunc()
   21. │   │ │       └─shiny::..stacktraceon..(expr)
   22. │   │ ├─shiny::withReactiveDomain(...)
   23. │   │ │ └─promises::with_promise_domain(...)
   24. │   │ │   └─domain$wrapSync(expr)
   25. │   │ │     └─base::force(expr)
   26. │   │ └─withr::with_options(...)
   27. │   │   └─base::force(code)
   28. │   └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
   29. └─testthat::expect_length(upd$links, 1L) at test-action.R:38:9
  ── Failure ('test-action.R:52:3'): draw link action with valid target ──────────
  Expected `upd$links` to have names "add".
  Differences:
  `actual` is NULL
  `expected` is a character vector ('add')
  
  Backtrace:
       ▆
    1. ├─blockr.dag (local) test_draw_link_action(g6_edge("a", "b"), 1L) at test-action.R:52:3
    2. │ └─shiny::testServer(...) at test-action.R:18:3
    3. │   ├─shiny:::withMockContext(...)
    4. │   │ ├─shiny::isolate(...)
    5. │   │ │ ├─shiny::..stacktraceoff..(...)
    6. │   │ │ └─ctx$run(...)
    7. │   │ │   ├─promises::with_promise_domain(...)
    8. │   │ │   │ └─domain$wrapSync(expr)
    9. │   │ │   ├─shiny::withReactiveDomain(...)
   10. │   │ │   │ └─promises::with_promise_domain(...)
   11. │   │ │   │   └─domain$wrapSync(expr)
   12. │   │ │   │     └─base::force(expr)
   13. │   │ │   ├─shiny:::with_otel_span_context(...)
   14. │   │ │   │ └─base::force(expr)
   15. │   │ │   ├─shiny::captureStackTraces(...)
   16. │   │ │   │ └─promises::with_promise_domain(...)
   17. │   │ │   │   └─domain$wrapSync(expr)
   18. │   │ │   │     └─base::withCallingHandlers(expr, error = doCaptureStack)
   19. │   │ │   └─env$runWith(self, func)
   20. │   │ │     └─shiny (local) contextFunc()
   21. │   │ │       └─shiny::..stacktraceon..(expr)
   22. │   │ ├─shiny::withReactiveDomain(...)
   23. │   │ │ └─promises::with_promise_domain(...)
   24. │   │ │   └─domain$wrapSync(expr)
   25. │   │ │     └─base::force(expr)
   26. │   │ └─withr::with_options(...)
   27. │   │   └─base::force(code)
   28. │   └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
   29. └─testthat::expect_named(upd$links, "add") at test-action.R:39:9
  ── Failure ('test-action.R:52:3'): draw link action with valid target ──────────
  Expected `upd$links$add` to have length 1.
  Actual length: 0.
  Backtrace:
       ▆
    1. ├─blockr.dag (local) test_draw_link_action(g6_edge("a", "b"), 1L) at test-action.R:52:3
    2. │ └─shiny::testServer(...) at test-action.R:18:3
    3. │   ├─shiny:::withMockContext(...)
    4. │   │ ├─shiny::isolate(...)
    5. │   │ │ ├─shiny::..stacktraceoff..(...)
    6. │   │ │ └─ctx$run(...)
    7. │   │ │   ├─promises::with_promise_domain(...)
    8. │   │ │   │ └─domain$wrapSync(expr)
    9. │   │ │   ├─shiny::withReactiveDomain(...)
   10. │   │ │   │ └─promises::with_promise_domain(...)
   11. │   │ │   │   └─domain$wrapSync(expr)
   12. │   │ │   │     └─base::force(expr)
   13. │   │ │   ├─shiny:::with_otel_span_context(...)
   14. │   │ │   │ └─base::force(expr)
   15. │   │ │   ├─shiny::captureStackTraces(...)
   16. │   │ │   │ └─promises::with_promise_domain(...)
   17. │   │ │   │   └─domain$wrapSync(expr)
   18. │   │ │   │     └─base::withCallingHandlers(expr, error = doCaptureStack)
   19. │   │ │   └─env$runWith(self, func)
   20. │   │ │     └─shiny (local) contextFunc()
   21. │   │ │       └─shiny::..stacktraceon..(expr)
   22. │   │ ├─shiny::withReactiveDomain(...)
   23. │   │ │ └─promises::with_promise_domain(...)
   24. │   │ │   └─domain$wrapSync(expr)
   25. │   │ │     └─base::force(expr)
   26. │   │ └─withr::with_options(...)
   27. │   │   └─base::force(code)
   28. │   └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
   29. └─testthat::expect_length(upd$links$add, 1L) at test-action.R:40:9
  ── Failure ('test-action.R:52:3'): draw link action with valid target ──────────
  Expected `new_link$from` to be identical to "a".
  Differences:
  `actual` is NULL
  `expected` is a character vector ('a')
  
  Backtrace:
       ▆
    1. ├─blockr.dag (local) test_draw_link_action(g6_edge("a", "b"), 1L) at test-action.R:52:3
    2. │ └─shiny::testServer(...) at test-action.R:18:3
    3. │   ├─shiny:::withMockContext(...)
    4. │   │ ├─shiny::isolate(...)
    5. │   │ │ ├─shiny::..stacktraceoff..(...)
    6. │   │ │ └─ctx$run(...)
    7. │   │ │   ├─promises::with_promise_domain(...)
    8. │   │ │   │ └─domain$wrapSync(expr)
    9. │   │ │   ├─shiny::withReactiveDomain(...)
   10. │   │ │   │ └─promises::with_promise_domain(...)
   11. │   │ │   │   └─domain$wrapSync(expr)
   12. │   │ │   │     └─base::force(expr)
   13. │   │ │   ├─shiny:::with_otel_span_context(...)
   14. │   │ │   │ └─base::force(expr)
   15. │   │ │   ├─shiny::captureStackTraces(...)
   16. │   │ │   │ └─promises::with_promise_domain(...)
   17. │   │ │   │   └─domain$wrapSync(expr)
   18. │   │ │   │     └─base::withCallingHandlers(expr, error = doCaptureStack)
   19. │   │ │   └─env$runWith(self, func)
   20. │   │ │     └─shiny (local) contextFunc()
   21. │   │ │       └─shiny::..stacktraceon..(expr)
   22. │   │ ├─shiny::withReactiveDomain(...)
   23. │   │ │ └─promises::with_promise_domain(...)
   24. │   │ │   └─domain$wrapSync(expr)
   25. │   │ │     └─base::force(expr)
   26. │   │ └─withr::with_options(...)
   27. │   │   └─base::force(code)
   28. │   └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
   29. └─testthat::expect_identical(new_link$from, "a") at test-action.R:43:9
  ── Failure ('test-action.R:52:3'): draw link action with valid target ──────────
  Expected `new_link$to` to be identical to "b".
  Differences:
  `actual` is NULL
  `expected` is a character vector ('b')
  
  Backtrace:
       ▆
    1. ├─blockr.dag (local) test_draw_link_action(g6_edge("a", "b"), 1L) at test-action.R:52:3
    2. │ └─shiny::testServer(...) at test-action.R:18:3
    3. │   ├─shiny:::withMockContext(...)
    4. │   │ ├─shiny::isolate(...)
    5. │   │ │ ├─shiny::..stacktraceoff..(...)
    6. │   │ │ └─ctx$run(...)
    7. │   │ │   ├─promises::with_promise_domain(...)
    8. │   │ │   │ └─domain$wrapSync(expr)
    9. │   │ │   ├─shiny::withReactiveDomain(...)
   10. │   │ │   │ └─promises::with_promise_domain(...)
   11. │   │ │   │   └─domain$wrapSync(expr)
   12. │   │ │   │     └─base::force(expr)
   13. │   │ │   ├─shiny:::with_otel_span_context(...)
   14. │   │ │   │ └─base::force(expr)
   15. │   │ │   ├─shiny::captureStackTraces(...)
   16. │   │ │   │ └─promises::with_promise_domain(...)
   17. │   │ │   │   └─domain$wrapSync(expr)
   18. │   │ │   │     └─base::withCallingHandlers(expr, error = doCaptureStack)
   19. │   │ │   └─env$runWith(self, func)
   20. │   │ │     └─shiny (local) contextFunc()
   21. │   │ │       └─shiny::..stacktraceon..(expr)
   22. │   │ ├─shiny::withReactiveDomain(...)
   23. │   │ │ └─promises::with_promise_domain(...)
   24. │   │ │   └─domain$wrapSync(expr)
   25. │   │ │     └─base::force(expr)
   26. │   │ └─withr::with_options(...)
   27. │   │   └─base::force(code)
   28. │   └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
   29. └─testthat::expect_identical(new_link$to, "b") at test-action.R:44:9
  ── Failure ('test-action.R:52:3'): draw link action with valid target ──────────
  Expected `new_link$input` to be identical to "data".
  Differences:
  `actual` is NULL
  `expected` is a character vector ('data')
  
  Backtrace:
       ▆
    1. ├─blockr.dag (local) test_draw_link_action(g6_edge("a", "b"), 1L) at test-action.R:52:3
    2. │ └─shiny::testServer(...) at test-action.R:18:3
    3. │   ├─shiny:::withMockContext(...)
    4. │   │ ├─shiny::isolate(...)
    5. │   │ │ ├─shiny::..stacktraceoff..(...)
    6. │   │ │ └─ctx$run(...)
    7. │   │ │   ├─promises::with_promise_domain(...)
    8. │   │ │   │ └─domain$wrapSync(expr)
    9. │   │ │   ├─shiny::withReactiveDomain(...)
   10. │   │ │   │ └─promises::with_promise_domain(...)
   11. │   │ │   │   └─domain$wrapSync(expr)
   12. │   │ │   │     └─base::force(expr)
   13. │   │ │   ├─shiny:::with_otel_span_context(...)
   14. │   │ │   │ └─base::force(expr)
   15. │   │ │   ├─shiny::captureStackTraces(...)
   16. │   │ │   │ └─promises::with_promise_domain(...)
   17. │   │ │   │   └─domain$wrapSync(expr)
   18. │   │ │   │     └─base::withCallingHandlers(expr, error = doCaptureStack)
   19. │   │ │   └─env$runWith(self, func)
   20. │   │ │     └─shiny (local) contextFunc()
   21. │   │ │       └─shiny::..stacktraceon..(expr)
   22. │   │ ├─shiny::withReactiveDomain(...)
   23. │   │ │ └─promises::with_promise_domain(...)
   24. │   │ │   └─domain$wrapSync(expr)
   25. │   │ │     └─base::force(expr)
   26. │   │ └─withr::with_options(...)
   27. │   │   └─base::force(code)
   28. │   └─rlang::eval_tidy(quosure, mask, rlang::caller_env())
   29. └─testthat::expect_identical(new_link$input, "data") at test-action.R:45:9
  ── Failure ('test-action.R:81:7'): remove_selected_action works ────────────────
  Expected `upd` to have length 3.
  Actual length: 0.
  Backtrace:
       ▆
    1. ├─shiny::testServer(...) at test-action.R:63: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_length(upd, 3L) at test-action.R:81:7
  ── Failure ('test-action.R:82:7'): remove_selected_action works ────────────────
  Expected `upd` to have names `c("blocks", "links", "stacks")`.
  Differences:
  `actual` is NULL
  `expected` is a character vector ('blocks', 'links', 'stacks')
  
  Backtrace:
       ▆
    1. ├─shiny::testServer(...) at test-action.R:63: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_named(upd, c("blocks", "links", "stacks")) at test-action.R:82:7
  ── Failure ('test-action.R:83:7'): remove_selected_action works ────────────────
  Expected `upd$blocks` to have names "rm".
  Differences:
  `actual` is NULL
  `expected` is a character vector ('rm')
  
  Backtrace:
       ▆
    1. ├─shiny::testServer(...) at test-action.R:63: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_named(upd$blocks, "rm") at test-action.R:83:7
  ── Failure ('test-action.R:84:7'): remove_selected_action works ────────────────
  Expected `upd$blocks$rm` to be identical to `input[["graph-selected_node"]]`.
  Differences:
  `actual` is NULL
  `expected` is a character vector ('a', 'b')
  
  Backtrace:
       ▆
    1. ├─shiny::testServer(...) at test-action.R:63: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_identical(upd$blocks$rm, input[["graph-selected_node"]]) at test-action.R:84:7
  ── Failure ('test-action.R:85:7'): remove_selected_action works ────────────────
  Expected `upd$links` to have names "rm".
  Differences:
  `actual` is NULL
  `expected` is a character vector ('rm')
  
  Backtrace:
       ▆
    1. ├─shiny::testServer(...) at test-action.R:63: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_named(upd$links, "rm") at test-action.R:85:7
  ── Failure ('test-action.R:86:7'): remove_selected_action works ────────────────
  Expected `upd$links$rm` to be identical to `input[["graph-selected_edge"]]`.
  Differences:
  `actual` is NULL
  `expected` is a character vector ('c-d')
  
  Backtrace:
       ▆
    1. ├─shiny::testServer(...) at test-action.R:63: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_identical(upd$links$rm, input[["graph-selected_edge"]]) at test-action.R:86:7
  ── Failure ('test-action.R:87:7'): remove_selected_action works ────────────────
  Expected `upd$stacks` to have names "rm".
  Differences:
  `actual` is NULL
  `expected` is a character vector ('rm')
  
  Backtrace:
       ▆
    1. ├─shiny::testServer(...) at test-action.R:63: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_named(upd$stacks, "rm") at test-action.R:87:7
  
  [ FAIL 15 | WARN 0 | SKIP 1 | PASS 136 ]
  Deleting unused snapshots: 'e2e/empty-app-001.json', 'e2e/empty-app-001_.png',
  'e2e/empty-app-002.json', 'e2e/empty-app-002_.png', 'e2e/empty-app-003.json',
  'e2e/empty-app-003_.png', 'e2e/empty-app-004.json', 'e2e/empty-app-004_.png',
  'e2e/empty-app-005.json', and 'e2e/empty-app-005_.png'
  Error:
  ! Test failures.
  Execution halted