Last updated on 2024-10-06 13:49:06 CEST.
| Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
|---|---|---|---|---|---|---|
| r-devel-linux-x86_64-debian-clang | 0.0.3 | 4.88 | 46.64 | 51.52 | ERROR | |
| r-devel-linux-x86_64-debian-gcc | 0.0.4 | 3.72 | 33.90 | 37.62 | OK | |
| r-devel-linux-x86_64-fedora-clang | 0.0.4 | 83.94 | OK | |||
| r-devel-linux-x86_64-fedora-gcc | 0.0.4 | 89.65 | OK | |||
| r-devel-windows-x86_64 | 0.0.4 | 11.00 | 72.00 | 83.00 | OK | |
| r-patched-linux-x86_64 | 0.0.4 | 4.49 | 43.79 | 48.28 | OK | |
| r-release-linux-x86_64 | 0.0.4 | 4.25 | 43.93 | 48.18 | OK | |
| r-release-macos-arm64 | 0.0.4 | 42.00 | OK | |||
| r-release-macos-x86_64 | 0.0.4 | 58.00 | OK | |||
| r-release-windows-x86_64 | 0.0.4 | 9.00 | 87.00 | 96.00 | OK | |
| r-oldrel-macos-arm64 | 0.0.4 | 45.00 | OK | |||
| r-oldrel-macos-x86_64 | 0.0.4 | 58.00 | OK | |||
| r-oldrel-windows-x86_64 | 0.0.4 | 11.00 | 77.00 | 88.00 | OK |
Version: 0.0.3
Check: tests
Result: ERROR
Running ‘testthat.R’ [7s/9s]
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(atrrr)
>
> test_check("atrrr")
[ FAIL 6 | WARN 0 | SKIP 2 | PASS 146 ]
══ Skipped tests (2) ═══════════════════════════════════════════════════════════
• !dir.exists(tools::R_user_dir("atrrr", "cache")) is TRUE (2):
'test-convert.R:6:3', 'test-convert.R:16:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test-feed.R:33:3'): get feed ────────────────────────────────────────
<purrr_error_indexed/rlang_error/error/condition>
Error in `purrr::map_chr(link, function(l) {
if (is_at(l))
return(l)
http_info <- parse_http_url(l)
if (is.na(http_info$repo) | is.na(http_info$rkey))
return(NA_character_)
if (!is_did(http_info$repo)) {
http_info$repo <- resolve_handle(http_info$repo, .token = .token)
}
glue::glue("at://{repo}/{collection}/{rkey}", .envir = http_info)
})`: i In index: 1.
Caused by error in `glue_data()`:
! is.environment(.envir) is not TRUE
Backtrace:
▆
1. ├─testthat::expect_type(get_feed(link, parse = FALSE), "list") at test-feed.R:33:3
2. │ └─testthat::quasi_label(enquo(object), arg = "object")
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─atrrr::get_feed(link, parse = FALSE)
5. │ └─atrrr::convert_http_to_at(feed_url, .token = .token)
6. │ └─purrr::map_chr(...)
7. │ └─purrr:::map_("character", .x, .f, ..., .progress = .progress)
8. │ ├─purrr:::with_indexed_errors(...)
9. │ │ └─base::withCallingHandlers(...)
10. │ ├─purrr:::call_with_cleanup(...)
11. │ └─atrrr (local) .f(.x[[i]], ...)
12. │ └─glue::glue("at://{repo}/{collection}/{rkey}", .envir = http_info)
13. │ └─glue::glue_data(...)
14. │ └─base::stopifnot(is.environment(.envir))
15. │ └─base::stop(simpleError(msg, call = if (p <- sys.parent(1L)) sys.call(p)))
16. └─purrr (local) `<fn>`(`<smplErrr>`)
17. └─cli::cli_abort(...)
18. └─rlang::abort(...)
── Error ('test-feed.R:49:3'): get likes ───────────────────────────────────────
<purrr_error_indexed/rlang_error/error/condition>
Error in `purrr::map_chr(link, function(l) {
if (is_at(l))
return(l)
http_info <- parse_http_url(l)
if (is.na(http_info$repo) | is.na(http_info$rkey))
return(NA_character_)
if (!is_did(http_info$repo)) {
http_info$repo <- resolve_handle(http_info$repo, .token = .token)
}
glue::glue("at://{repo}/{collection}/{rkey}", .envir = http_info)
})`: i In index: 1.
Caused by error in `glue_data()`:
! is.environment(.envir) is not TRUE
Backtrace:
▆
1. ├─testthat::expect_type(get_likes(link, parse = FALSE), "list") at test-feed.R:49:3
2. │ └─testthat::quasi_label(enquo(object), arg = "object")
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─atrrr::get_likes(link, parse = FALSE)
5. │ └─atrrr::convert_http_to_at(post_url, .token = .token)
6. │ └─purrr::map_chr(...)
7. │ └─purrr:::map_("character", .x, .f, ..., .progress = .progress)
8. │ ├─purrr:::with_indexed_errors(...)
9. │ │ └─base::withCallingHandlers(...)
10. │ ├─purrr:::call_with_cleanup(...)
11. │ └─atrrr (local) .f(.x[[i]], ...)
12. │ └─glue::glue("at://{repo}/{collection}/{rkey}", .envir = http_info)
13. │ └─glue::glue_data(...)
14. │ └─base::stopifnot(is.environment(.envir))
15. │ └─base::stop(simpleError(msg, call = if (p <- sys.parent(1L)) sys.call(p)))
16. └─purrr (local) `<fn>`(`<smplErrr>`)
17. └─cli::cli_abort(...)
18. └─rlang::abort(...)
── Error ('test-feed.R:58:3'): get reposts ─────────────────────────────────────
<purrr_error_indexed/rlang_error/error/condition>
Error in `purrr::map_chr(link, function(l) {
if (is_at(l))
return(l)
http_info <- parse_http_url(l)
if (is.na(http_info$repo) | is.na(http_info$rkey))
return(NA_character_)
if (!is_did(http_info$repo)) {
http_info$repo <- resolve_handle(http_info$repo, .token = .token)
}
glue::glue("at://{repo}/{collection}/{rkey}", .envir = http_info)
})`: i In index: 1.
Caused by error in `glue_data()`:
! is.environment(.envir) is not TRUE
Backtrace:
▆
1. ├─testthat::expect_type(get_reposts(link, parse = FALSE), "list") at test-feed.R:58:3
2. │ └─testthat::quasi_label(enquo(object), arg = "object")
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─atrrr::get_reposts(link, parse = FALSE)
5. │ └─atrrr::convert_http_to_at(post_url, .token = .token)
6. │ └─purrr::map_chr(...)
7. │ └─purrr:::map_("character", .x, .f, ..., .progress = .progress)
8. │ ├─purrr:::with_indexed_errors(...)
9. │ │ └─base::withCallingHandlers(...)
10. │ ├─purrr:::call_with_cleanup(...)
11. │ └─atrrr (local) .f(.x[[i]], ...)
12. │ └─glue::glue("at://{repo}/{collection}/{rkey}", .envir = http_info)
13. │ └─glue::glue_data(...)
14. │ └─base::stopifnot(is.environment(.envir))
15. │ └─base::stop(simpleError(msg, call = if (p <- sys.parent(1L)) sys.call(p)))
16. └─purrr (local) `<fn>`(`<smplErrr>`)
17. └─cli::cli_abort(...)
18. └─rlang::abort(...)
── Error ('test-feed.R:67:3'): get feed likes ──────────────────────────────────
<purrr_error_indexed/rlang_error/error/condition>
Error in `purrr::map_chr(link, function(l) {
if (is_at(l))
return(l)
http_info <- parse_http_url(l)
if (is.na(http_info$repo) | is.na(http_info$rkey))
return(NA_character_)
if (!is_did(http_info$repo)) {
http_info$repo <- resolve_handle(http_info$repo, .token = .token)
}
glue::glue("at://{repo}/{collection}/{rkey}", .envir = http_info)
})`: i In index: 1.
Caused by error in `glue_data()`:
! is.environment(.envir) is not TRUE
Backtrace:
▆
1. ├─testthat::expect_type(get_feed_likes(link, parse = FALSE), "list") at test-feed.R:67:3
2. │ └─testthat::quasi_label(enquo(object), arg = "object")
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─atrrr::get_feed_likes(link, parse = FALSE)
5. │ └─atrrr::convert_http_to_at(feed_url, .token = .token)
6. │ └─purrr::map_chr(...)
7. │ └─purrr:::map_("character", .x, .f, ..., .progress = .progress)
8. │ ├─purrr:::with_indexed_errors(...)
9. │ │ └─base::withCallingHandlers(...)
10. │ ├─purrr:::call_with_cleanup(...)
11. │ └─atrrr (local) .f(.x[[i]], ...)
12. │ └─glue::glue("at://{repo}/{collection}/{rkey}", .envir = http_info)
13. │ └─glue::glue_data(...)
14. │ └─base::stopifnot(is.environment(.envir))
15. │ └─base::stop(simpleError(msg, call = if (p <- sys.parent(1L)) sys.call(p)))
16. └─purrr (local) `<fn>`(`<smplErrr>`)
17. └─cli::cli_abort(...)
18. └─rlang::abort(...)
── Error ('test-feed.R:76:3'): get thread ──────────────────────────────────────
<purrr_error_indexed/rlang_error/error/condition>
Error in `purrr::map_chr(link, function(l) {
if (is_at(l))
return(l)
http_info <- parse_http_url(l)
if (is.na(http_info$repo) | is.na(http_info$rkey))
return(NA_character_)
if (!is_did(http_info$repo)) {
http_info$repo <- resolve_handle(http_info$repo, .token = .token)
}
glue::glue("at://{repo}/{collection}/{rkey}", .envir = http_info)
})`: i In index: 1.
Caused by error in `glue_data()`:
! is.environment(.envir) is not TRUE
Backtrace:
▆
1. ├─testthat::expect_s3_class(get_thread(link), "tbl_df") at test-feed.R:76:3
2. │ └─testthat::quasi_label(enquo(object), arg = "object")
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─atrrr::get_thread(link)
5. │ └─atrrr::convert_http_to_at(post_url, .token = .token)
6. │ └─purrr::map_chr(...)
7. │ └─purrr:::map_("character", .x, .f, ..., .progress = .progress)
8. │ ├─purrr:::with_indexed_errors(...)
9. │ │ └─base::withCallingHandlers(...)
10. │ ├─purrr:::call_with_cleanup(...)
11. │ └─atrrr (local) .f(.x[[i]], ...)
12. │ └─glue::glue("at://{repo}/{collection}/{rkey}", .envir = http_info)
13. │ └─glue::glue_data(...)
14. │ └─base::stopifnot(is.environment(.envir))
15. │ └─base::stop(simpleError(msg, call = if (p <- sys.parent(1L)) sys.call(p)))
16. └─purrr (local) `<fn>`(`<smplErrr>`)
17. └─cli::cli_abort(...)
18. └─rlang::abort(...)
── Error ('test-feed.R:86:3'): get replies ─────────────────────────────────────
<purrr_error_indexed/rlang_error/error/condition>
Error in `purrr::map_chr(link, function(l) {
if (is_at(l))
return(l)
http_info <- parse_http_url(l)
if (is.na(http_info$repo) | is.na(http_info$rkey))
return(NA_character_)
if (!is_did(http_info$repo)) {
http_info$repo <- resolve_handle(http_info$repo, .token = .token)
}
glue::glue("at://{repo}/{collection}/{rkey}", .envir = http_info)
})`: i In index: 1.
Caused by error in `glue_data()`:
! is.environment(.envir) is not TRUE
Backtrace:
▆
1. ├─testthat::expect_s3_class(get_replies(link), "tbl_df") at test-feed.R:86:3
2. │ └─testthat::quasi_label(enquo(object), arg = "object")
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─atrrr::get_replies(link)
5. │ └─atrrr::convert_http_to_at(post_url, .token = .token)
6. │ └─purrr::map_chr(...)
7. │ └─purrr:::map_("character", .x, .f, ..., .progress = .progress)
8. │ ├─purrr:::with_indexed_errors(...)
9. │ │ └─base::withCallingHandlers(...)
10. │ ├─purrr:::call_with_cleanup(...)
11. │ └─atrrr (local) .f(.x[[i]], ...)
12. │ └─glue::glue("at://{repo}/{collection}/{rkey}", .envir = http_info)
13. │ └─glue::glue_data(...)
14. │ └─base::stopifnot(is.environment(.envir))
15. │ └─base::stop(simpleError(msg, call = if (p <- sys.parent(1L)) sys.call(p)))
16. └─purrr (local) `<fn>`(`<smplErrr>`)
17. └─cli::cli_abort(...)
18. └─rlang::abort(...)
[ FAIL 6 | WARN 0 | SKIP 2 | PASS 146 ]
Error: Test failures
Execution halted
Flavor: r-devel-linux-x86_64-debian-clang