Running ‘testthat.R’ [104s/143s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(mpathsenser)
  > 
  > test_check("mpathsenser")
  
  Attaching package: 'purrr'
  
  The following object is masked from 'package:testthat':
  
      is_null
  
  [ FAIL 1 | WARN 53 | SKIP 0 | PASS 469 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-sensor_functions.R:123:3'): app_category ───────────────────────
  Error in `if (is.character(txt) && length(txt) == 1 && nchar(txt, type = "bytes") < 
      2084 && !validate(txt)) {
      if (grepl("^https?://", txt, useBytes = TRUE)) {
          txt <- if (R.version$major < 4) {
              base::url(txt)
          }
          else {
              base::url(txt, headers = c(Accept = "application/json, text/*, */*"))
          }
      }
      else if (file.exists(txt)) {
          txt <- file(txt)
      }
  }`: missing value where TRUE/FALSE needed
  Backtrace:
      ▆
   1. ├─mpathsenser::app_category("whatsapp", exact = FALSE) at test-sensor_functions.R:123:3
   2. │ └─mpathsenser:::app_category_impl(name[i], num, exact)
   3. │   └─... %>% purrr::pluck("applicationCategory")
   4. ├─purrr::pluck(., "applicationCategory")
   5. │ └─purrr:::pluck_raw(.x, list2(...), .default = .default)
   6. └─jsonlite::fromJSON(.)
  
  [ FAIL 1 | WARN 53 | SKIP 0 | PASS 469 ]
  Error: Test failures
  Execution halted