Running ‘testthat.R’ [3s/3s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(tidyRSS)
  > 
  > test_check("tidyRSS")
  ── 1. Error: tidyfeed returns a data_frame (@test.feeds.R#11)  ─────────────────
  the condition has length > 1
  1: expect_is(tidyfeed(rss), "tbl_df") at testthat/test.feeds.R:11
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: tidyfeed(rss)
  5: suppressWarnings({
         stopifnot(identical(length(feed), 1L))
         msg <- "Error in feed parse; please check URL.\nIf you're certain that this is a valid rss feed, please file an issue at https://github.com/RobertMyles/tidyRSS/issues. Please note that the feed may also be undergoing maintenance."
         doc <- try(httr::GET(feed), silent = TRUE)
         if (grepl("json", doc$headers$`content-type`)) {
             result <- json_parse(feed)
             return(result)
         }
         else {
             doc <- doc %>% xml2::read_xml()
         }
         if (unique(grepl("try-error", class(doc)))) {
             stop(msg)
         }
         if (grepl("http://www.w3.org/2005/Atom", xml2::xml_attr(doc, "xmlns"))) {
             result <- atom_parse(doc)
             return(result)
         }
         else if (grepl("http://www.georss.org/georss", xml2::xml_attr(doc, "xmlns:georss"))) {
             result <- geo_parse(doc)
             if (sf == TRUE) {
                 result <- sf::st_as_sf(x = result, coords = c("item_long", "item_lat"), 
                     crs = "+proj=longlat +datum=WGS84")
             }
             return(result)
         }
         else {
             result <- rss_parse(doc)
             return(result)
         }
     })
  6: withCallingHandlers(expr, warning = function(w) invokeRestart("muffleWarning"))
  7: geo_parse(doc)
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  OK: 1 SKIPPED: 0 FAILED: 1
  1. Error: tidyfeed returns a data_frame (@test.feeds.R#11) 
  
  Error: testthat unit tests failed
  Execution halted