Running ‘testthat.R’ [2s/2s]
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(Rtumblr)
  > 
  > test_check("Rtumblr")
  [ FAIL 6 | WARN 0 | SKIP 0 | PASS 0 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-blogs.R:6:5'): blog_info ───────────────────────────────────────
  <subscriptOutOfBoundsError/error/condition>
  Error in `output[["response"]]`: subscript out of bounds
  Backtrace:
      ▆
   1. ├─vcr::use_cassette(...) at test-blogs.R:5:3
   2. │ └─cassette$call_block(...)
   3. └─Rtumblr::get_blog_info("schochastics", api_key = fake_api) at test-blogs.R:6:5
   4.   └─Rtumblr:::parse_blog_info(output[["response"]][["blog"]])
   5.     └─base::lapply(...)
  ── Error ('test-blogs.R:23:5'): blog_posts ─────────────────────────────────────
  <subscriptOutOfBoundsError/error/condition>
  Error in `output_lst[["response"]]`: subscript out of bounds
  Backtrace:
      ▆
   1. ├─vcr::use_cassette(...) at test-blogs.R:22:3
   2. │ └─cassette$call_block(...)
   3. └─Rtumblr::get_blog_posts("schochastics", api_key = fake_api) at test-blogs.R:23:5
   4.   ├─dplyr::bind_rows(...)
   5.   │ └─rlang::list2(...)
   6.   └─base::lapply(output_lst[["response"]][["posts"]], parse_blog_post)
  ── Error ('test-blogs.R:31:5'): tagged_link ────────────────────────────────────
  <subscriptOutOfBoundsError/error/condition>
  Error in `output_lst[["response"]]`: subscript out of bounds
  Backtrace:
      ▆
   1. ├─vcr::use_cassette(...) at test-blogs.R:30:3
   2. │ └─cassette$call_block(...)
   3. └─Rtumblr::get_posts_tag("url") at test-blogs.R:31:5
   4.   └─base::lapply(output_lst[["response"]], parse_blog_post_legacy)
  ── Error ('test-blogs.R:38:5'): tagged_text ────────────────────────────────────
  <subscriptOutOfBoundsError/error/condition>
  Error in `output_lst[["response"]]`: subscript out of bounds
  Backtrace:
      ▆
   1. ├─vcr::use_cassette(...) at test-blogs.R:37:3
   2. │ └─cassette$call_block(...)
   3. └─Rtumblr::get_posts_tag("writer") at test-blogs.R:38:5
   4.   └─base::lapply(output_lst[["response"]], parse_blog_post_legacy)
  ── Error ('test-blogs.R:45:5'): tagged_photo ───────────────────────────────────
  <subscriptOutOfBoundsError/error/condition>
  Error in `output_lst[["response"]]`: subscript out of bounds
  Backtrace:
      ▆
   1. ├─vcr::use_cassette(...) at test-blogs.R:44:3
   2. │ └─cassette$call_block(...)
   3. └─Rtumblr::get_posts_tag("meme") at test-blogs.R:45:5
   4.   └─base::lapply(output_lst[["response"]], parse_blog_post_legacy)
  ── Error ('test-blogs.R:52:5'): tagged_video ───────────────────────────────────
  <subscriptOutOfBoundsError/error/condition>
  Error in `output_lst[["response"]]`: subscript out of bounds
  Backtrace:
      ▆
   1. ├─vcr::use_cassette(...) at test-blogs.R:51:3
   2. │ └─cassette$call_block(...)
   3. └─Rtumblr::get_posts_tag("video") at test-blogs.R:52:5
   4.   └─base::lapply(output_lst[["response"]], parse_blog_post_legacy)
  
  [ FAIL 6 | WARN 0 | SKIP 0 | PASS 0 ]
  Error: Test failures
  Execution halted