CRAN Package Check Results for Maintainer ‘Peyman Eshghi <peymaan.es at gmail.com>’

Last updated on 2025-12-28 01:49:18 CET.

Package	ERROR	OK
rAccess	1	12

Package rAccess

Current CRAN status: ERROR: 1, OK: 12

Version: 0.1.1.3
Check: tests
Result: ERROR Running 'testthat.R' [16s] 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/tests.html > # * https://testthat.r-lib.org/reference/test_package.html#special-files > > library(testthat) > library(rAccess) > library(DT) > library(pins) > library(shiny) Attaching package: 'shiny' The following objects are masked from 'package:DT': dataTableOutput, renderDataTable > library(tibble) > > > test_check("rAccess") Saving _problems/test-app-33.R Guessing `type = 'rds'` Creating new version '20251225T102458Z-8ad95' Writing to pin 'test_access_board' Guessing `type = 'rds'` ! The hash of pin "test_access_board" has not changed. * Your pin will not be stored. Guessing `type = 'rds'` ! The hash of pin "test_access_board" has not changed. * Your pin will not be stored. Guessing `type = 'rds'` ! The hash of pin "test_access_board" has not changed. * Your pin will not be stored. editrow: editrow: editrow: editrow: Guessing `type = 'rds'` Replacing version '20251225T102458Z-8ad95' with '20251225T102501Z-6440e' Writing to pin 'test_access_board' editrow: Guessing `type = 'rds'` Creating new version '20251225T102502Z-8ad95' Writing to pin 'single_unit_test_access_board' Guessing `type = 'rds'` ! The hash of pin "single_unit_test_access_board" has not changed. * Your pin will not be stored. Guessing `type = 'rds'` ! The hash of pin "single_unit_test_access_board" has not changed. * Your pin will not be stored. Guessing `type = 'rds'` ! The hash of pin "single_unit_test_access_board" has not changed. * Your pin will not be stored. editrow: editrow: editrow: editrow: Guessing `type = 'rds'` Replacing version '20251225T102502Z-8ad95' with '20251225T102504Z-6440e' Writing to pin 'single_unit_test_access_board' editrow: editrow: 1 <span> <img src="png/caution-icon.png" class="img-10px pr-2"/> ADMIN Panel cannot be empty!! <br/> Please add another Admin to remove this user </span> editrow: 1 141: observe 140: <observer:observeEvent(input$btneditUsrSubmit)> 138: valueFunc 119: func 117: f 116: Reduce 107: do 106: hybrid_chain 105: observeEvent(input$btneditUsrSubmit) 104: contextFunc 103: env$runWith 90: ctx$run 89: run 70: flushCallback 69: FUN 68: lapply 67: ctx$executeFlushCallbacks 66: .getReactiveEnvironment()$flush 65: shiny:::flushReact 64: private$flush 63: session$setInputs 62: rlang::eval_tidy [test-app.R#234] 36: testServer 35: eval [test-app.R#140] 34: eval 25: test_code 24: test_that 23: eval [test-app.R#108] 22: eval 13: test_code 12: source_file 11: FUN 10: lapply 4: test_files_serial 3: test_files 2: test_dir 1: test_check Guessing `type = 'rds'` Creating new version '20251225T102505Z-8ad95' Writing to pin 'single_unit_test2_access_board' Guessing `type = 'rds'` ! The hash of pin "single_unit_test2_access_board" has not changed. * Your pin will not be stored. Guessing `type = 'rds'` ! The hash of pin "single_unit_test2_access_board" has not changed. * Your pin will not be stored. Guessing `type = 'rds'` ! The hash of pin "single_unit_test2_access_board" has not changed. * Your pin will not be stored. editrow: editrow: editrow: editrow: editrow: 1 141: observe 140: <observer:observeEvent(input$btneditUsrSubmit)> 138: valueFunc 119: func 117: f 116: Reduce 107: do 106: hybrid_chain 105: observeEvent(input$btneditUsrSubmit) 104: contextFunc 103: env$runWith 90: ctx$run 89: run 70: flushCallback 69: FUN 68: lapply 67: ctx$executeFlushCallbacks 66: .getReactiveEnvironment()$flush 65: shiny:::flushReact 64: private$flush 63: session$setInputs 62: rlang::eval_tidy [test-app.R#353] 36: testServer 35: eval [test-app.R#289] 34: eval 25: test_code 24: test_that 23: eval [test-app.R#257] 22: eval 13: test_code 12: source_file 11: FUN 10: lapply 4: test_files_serial 3: test_files 2: test_dir 1: test_check Saving _problems/test-app-383.R Saving _problems/test-app-425.R Guessing `type = 'rds'` Creating new version '20251225T102508Z-95ef5' Writing to pin 'new_pin_access_board' Guessing `type = 'rds'` ! The hash of pin "new_pin_access_board" has not changed. * Your pin will not be stored. Guessing `type = 'rds'` ! The hash of pin "new_pin_access_board" has not changed. * Your pin will not be stored. Guessing `type = 'rds'` ! The hash of pin "new_pin_access_board" has not changed. * Your pin will not be stored. editrow: editrow: editrow: editrow: $ADMIN NULL $sum [1] "plot" "summary" $data [1] "view" $ADMIN NULL $sum $sum$plot NULL $sum$summary NULL $data $data$view NULL [ FAIL 3 | WARN 2 | SKIP 4 | PASS 37 ] ══ Skipped tests (4) ═══════════════════════════════════════════════════════════ • empty test (4): 'test-app.R:40:1', 'test-app.R:108:1', 'test-app.R:257:1', 'test-app.R:519:1' ══ Failed tests ════════════════════════════════════════════════════════════════ ── Error ('test-app.R:33:5'): app works if additional access unit is added to an stored board ── Error in `object_read(meta)`: `meta$type` must be a string or character vector. Backtrace: ▆ 1. ├─shiny::testServer(...) at test-app.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. │ └─rAccess (local) server(input = session$input, output = session$output, session = session) 28. │ └─rAccess::module_iam_server("iam", new_iam) at test-app.R:33:5 29. │ └─rAccess:::module_sub_iam_server(...) 30. │ └─shiny::moduleServer(...) 31. │ ├─session$setReturned(callModule(module, id, session = session)) 32. │ └─shiny::callModule(module, id, session = session) 33. │ ├─shiny::withReactiveDomain(...) 34. │ │ └─promises::with_promise_domain(...) 35. │ │ └─domain$wrapSync(expr) 36. │ │ └─base::force(expr) 37. │ └─rAccess (local) module(childScope$input, childScope$output, childScope, ...) 38. │ └─rAccess_obj$pin_board %>% pin_read(pin_name) 39. ├─pins::pin_read(., pin_name) 40. │ └─pins:::object_read(meta) 41. │ └─rlang::arg_match0(meta$type, object_types) 42. └─rlang::abort(message = message, call = call) ── Error ('test-app.R:380:3'): rAccess methods work correctly after access boards edits ── Error in `object_read(meta)`: `meta$type` must be a string or character vector. Backtrace: ▆ 1. ├─testthat::expect_named(...) at test-app.R:380:3 2. │ └─testthat::quasi_label(enquo(object), label) 3. │ └─rlang::eval_bare(expr, quo_get_env(quo)) 4. ├─new_iam$get_user_accesslist("UserID") 5. │ └─self$pin_board %>% pin_read(pin_name) 6. ├─pins::pin_read(., pin_name) 7. │ └─pins:::object_read(meta) 8. │ └─rlang::arg_match0(meta$type, object_types) 9. └─rlang::abort(message = message, call = call) ── Error ('test-app.R:424:5'): user access edits work on a saved access boards. ── Error in `object_read(meta)`: `meta$type` must be a string or character vector. Backtrace: ▆ 1. ├─shiny::testServer(...) at test-app.R:427: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. │ └─rAccess (local) server(input = session$input, output = session$output, session = session) 28. │ └─new_iam$is_admin() at test-app.R:424:5 29. │ └─self$pin_board %>% pin_read(pin_name) 30. ├─pins::pin_read(., pin_name) 31. │ └─pins:::object_read(meta) 32. │ └─rlang::arg_match0(meta$type, object_types) 33. └─rlang::abort(message = message, call = call) [ FAIL 3 | WARN 2 | SKIP 4 | PASS 37 ] Error: ! Test failures. Execution halted Flavor: r-release-windows-x86_64