Update snapshot tests for testthat 3.1.3

Relates to #388

Author: jennybc

DESCRIPTION

@@ -41,7 +41,7 @@ Suggests:
     roxygen2,
     sodium,
     spelling,
-    testthat (>= 3.0.0)
+    testthat (>= 3.1.3)
 VignetteBuilder: 
     knitr
 Remotes: 

tests/testthat/_snaps/dribble.md

@@ -13,130 +13,147 @@
 
     Code
       new_dribble(1:3)
-    Error <simpleError>
-      `x` must be a list
+    Condition
+      Error:
+      ! `x` must be a list
 
 # validate_dribble() checks class, var names, var types
 
     Code
       validate_dribble("a")
-    Error <simpleError>
-      inherits(x, "dribble") is not TRUE
+    Condition
+      Error in `validate_dribble()`:
+      ! inherits(x, "dribble") is not TRUE
 
 ---
 
     Code
       validate_dribble(d)
-    Error <rlang_error>
-      Invalid <dribble>. This column has the wrong type:
+    Condition
+      Error in `validate_dribble()`:
+      ! Invalid <dribble>. This column has the wrong type:
       * `id`
 
 ---
 
     Code
       validate_dribble(d)
-    Error <rlang_error>
-      Invalid <dribble>. These columns have the wrong type:
+    Condition
+      Error in `validate_dribble()`:
+      ! Invalid <dribble>. These columns have the wrong type:
       * `name`
       * `id`
 
 ---
 
     Code
       validate_dribble(d)
-    Error <rlang_error>
-      Invalid <dribble>. This required column is missing:
+    Condition
+      Error in `validate_dribble()`:
+      ! Invalid <dribble>. This required column is missing:
       * `name`
 
 ---
 
     Code
       validate_dribble(d)
-    Error <rlang_error>
-      Invalid <dribble>. These required columns are missing:
+    Condition
+      Error in `validate_dribble()`:
+      ! Invalid <dribble>. These required columns are missing:
       * `name`
       * `id`
 
 ---
 
     Code
       validate_dribble(d)
-    Error <rlang_error>
-      Invalid <dribble>. Can't confirm `kind = "drive#file"` or `kind = "drive#drive"` for all elements of the `drive_resource` column.
+    Condition
+      Error in `validate_dribble()`:
+      ! Invalid <dribble>. Can't confirm `kind = "drive#file"` or `kind = "drive#drive"` for all elements of the `drive_resource` column.
 
 # dribble nrow checkers work
 
     Code
       confirm_single_file(d)
-    Error <rlang_error>
-      `d` does not identify at least one Drive file.
+    Condition
+      Error in `confirm_single_file()`:
+      ! `d` does not identify at least one Drive file.
 
 ---
 
     Code
       confirm_some_files(d)
-    Error <rlang_error>
-      `d` does not identify at least one Drive file.
+    Condition
+      Error in `confirm_some_files()`:
+      ! `d` does not identify at least one Drive file.
 
 ---
 
     Code
       confirm_single_file(d)
-    Error <rlang_error>
-      `d` identifies more than one Drive file.
+    Condition
+      Error in `confirm_single_file()`:
+      ! `d` identifies more than one Drive file.
 
 # as_dribble() default method handles unsuitable input
 
     Code
       as_dribble(1.3)
-    Error <rlang_error>
-      Don't know how to coerce an object of class <numeric> into a <dribble>.
+    Condition
+      Error in `as_dribble()`:
+      ! Don't know how to coerce an object of class <numeric> into a <dribble>.
 
 ---
 
     Code
       as_dribble(TRUE)
-    Error <rlang_error>
-      Don't know how to coerce an object of class <logical> into a <dribble>.
+    Condition
+      Error in `as_dribble()`:
+      ! Don't know how to coerce an object of class <logical> into a <dribble>.
 
 # as_dribble.list() catches bad input
 
     Code
       as_dribble(list(drib_lst))
-    Error <simpleError>
-      map_lgl(x, ~all(required_nms %in% names(.x))) is not TRUE
+    Condition
+      Error in `as_dribble.list()`:
+      ! map_lgl(x, ~all(required_nms %in% names(.x))) is not TRUE
 
 ---
 
     Code
       as_dribble(list(drib_lst))
-    Error <rlang_error>
-      Invalid <dribble>. Can't confirm `kind = "drive#file"` or `kind = "drive#drive"` for all elements of the `drive_resource` column.
+    Condition
+      Error in `validate_dribble()`:
+      ! Invalid <dribble>. Can't confirm `kind = "drive#file"` or `kind = "drive#drive"` for all elements of the `drive_resource` column.
 
 # as_parent() throws specific errors
 
     Code
       foo <- d[0, ]
       as_parent(foo)
-    Error <rlang_error>
-      Parent specified via `foo` is invalid:
+    Condition
+      Error in `as_parent()`:
+      ! Parent specified via `foo` is invalid:
       x Does not exist.
 
 ---
 
     Code
       foo <- d
       as_parent(foo)
-    Error <rlang_error>
-      Parent specified via `foo` is invalid:
+    Condition
+      Error in `as_parent()`:
+      ! Parent specified via `foo` is invalid:
       x Doesn't uniquely identify exactly one folder or shared drive.
 
 ---
 
     Code
       foo <- d[1, ]
       as_parent(foo)
-    Error <rlang_error>
-      Parent specified via `foo` is invalid:
+    Condition
+      Error in `as_parent()`:
+      ! Parent specified via `foo` is invalid:
       x Is neither a folder nor a shared drive.
 

tests/testthat/_snaps/drive_auth.md

@@ -2,6 +2,7 @@
 
     Code
       drive_auth_configure(app = gargle::gargle_app(), path = "PATH")
-    Error <rlang_error>
-      Must supply exactly one of `app` or `path`, not both
+    Condition
+      Error in `drive_auth_configure()`:
+      ! Must supply exactly one of `app` or `path`, not both
 

tests/testthat/_snaps/drive_cp.md

@@ -22,16 +22,18 @@
 
     Code
       drive_cp(file, nm_("i-am-a-folder"))
-    Error <rlang_error>
-      Unclear if `path` specifies parent folder or full path to the new file, including its name.
+    Condition
+      Error in `confirm_clear_path()`:
+      ! Unclear if `path` specifies parent folder or full path to the new file, including its name.
       See `?as_dribble()` for advice on how to make this clear.
 
 # drive_cp() errors if asked to copy a folder
 
     Code
       drive_cp(nm_("i-am-a-folder"))
-    Error <rlang_error>
-      The Drive API does not copy folders or shared drives.
+    Condition
+      Error in `drive_cp()`:
+      ! The Drive API does not copy folders or shared drives.
 
 # drive_cp() takes name, assumes path is folder if both are specified
 
@@ -48,15 +50,17 @@
     Code
       file_cp <- drive_cp(nm_("i-am-a-file"), path = nm_("file-name"), name = nm_(
         "file-name"))
-    Error <rlang_error>
-      Parent specified via `path` is invalid:
+    Condition
+      Error in `as_parent()`:
+      ! Parent specified via `path` is invalid:
       x Does not exist.
 
 ---
 
     Code
       file_cp <- drive_cp(nm_("i-am-a-file"), append_slash(nm_("not-unique-folder")))
-    Error <rlang_error>
-      Parent specified via `path` is invalid:
+    Condition
+      Error in `as_parent()`:
+      ! Parent specified via `path` is invalid:
       x Doesn't uniquely identify exactly one folder or shared drive.
 

tests/testthat/_snaps/drive_create.md

@@ -2,29 +2,33 @@
 
     Code
       drive_create()
-    Error <simpleError>
-      argument "name" is missing, with no default
+    Condition
+      Error in `is_string()`:
+      ! argument "name" is missing, with no default
 
 ---
 
     Code
       drive_create(letters)
-    Error <simpleError>
-      is_string(name) is not TRUE
+    Condition
+      Error in `drive_create()`:
+      ! is_string(name) is not TRUE
 
 # drive_create() errors if parent path does not exist
 
     Code
       drive_create("a", path = "qweruiop")
-    Error <rlang_error>
-      Parent specified via `path` is invalid:
+    Condition
+      Error in `as_parent()`:
+      ! Parent specified via `path` is invalid:
       x Does not exist.
 
 # drive_create() errors if parent exists but is not a folder
 
     Code
       drive_create("a", path = x)
-    Error <rlang_error>
-      Parent specified via `path` is invalid:
+    Condition
+      Error in `as_parent()`:
+      ! Parent specified via `path` is invalid:
       x Is neither a folder nor a shared drive.
 

tests/testthat/_snaps/drive_download.md

@@ -2,8 +2,9 @@
 
     Code
       withr::with_dir(tmpdir, drive_download(dribble(), path = precious_filepath))
-    Error <rlang_error>
-      Local `path` already exists and overwrite is `FALSE`:
+    Condition
+      Error in `drive_download()`:
+      ! Local `path` already exists and overwrite is `FALSE`:
       * 'precious-TEST-drive_download.txt'
 
 # drive_download() downloads a file and adds local_path column
@@ -20,8 +21,9 @@
 
     Code
       drive_download(nm_("this-should-not-exist"))
-    Error <rlang_error>
-      `file` does not identify at least one Drive file.
+    Condition
+      Error in `confirm_single_file()`:
+      ! `file` does not identify at least one Drive file.
 
 # drive_download() converts with explicit `type`
 

tests/testthat/_snaps/drive_examples.md

@@ -2,8 +2,9 @@
 
     Code
       drive_example_remote("chicken")
-    Error <rlang_error>
-      Found multiple matching remote files:
+    Condition
+      Error in `one_file()`:
+      ! Found multiple matching remote files:
       * 'chicken_doc'
       * 'chicken_sheet'
       * 'chicken.csv'
@@ -16,8 +17,9 @@
 
     Code
       drive_example_local("chicken")
-    Error <rlang_error>
-      Found multiple matching local files:
+    Condition
+      Error in `one_file()`:
+      ! Found multiple matching local files:
       * 'chicken.csv'
       * 'chicken.jpg'
       * 'chicken.pdf'
@@ -28,6 +30,7 @@
 
     Code
       drive_examples_local("platypus")
-    Error <rlang_error>
-      Can't find a local example file with a name that matches "platypus".
+    Condition
+      Error in `many_files()`:
+      ! Can't find a local example file with a name that matches "platypus".
 

tests/testthat/_snaps/drive_fields.md

@@ -2,15 +2,16 @@
 
     Code
       out <- drive_fields(x, resource = "foo")
-    Message <cliMessage>
+    Message
       ! Currently only fields for the 'files' resource can be checked for validity.
         Nothing done.
 
 # drive_fields() detects bad fields
 
     Code
       out <- drive_fields(c("name", "parents", "ownedByMe", "pancakes!"))
-    Warning <rlang_warning>
+    Condition
+      Warning:
       Omitting fields that are not recognized as part of the Files resource:
       * 'pancakes!'
 

tests/testthat/_snaps/drive_find.md

@@ -2,20 +2,23 @@
 
     Code
       drive_find(n_max = "a")
-    Error <simpleError>
-      is.numeric(n_max) is not TRUE
+    Condition
+      Error in `drive_find()`:
+      ! is.numeric(n_max) is not TRUE
 
 ---
 
     Code
       drive_find(n_max = 1:3)
-    Error <simpleError>
-      length(n_max) == 1 is not TRUE
+    Condition
+      Error in `drive_find()`:
+      ! length(n_max) == 1 is not TRUE
 
 ---
 
     Code
       drive_find(n_max = -2)
-    Error <simpleError>
-      n_max >= 0 is not TRUE
+    Condition
+      Error in `drive_find()`:
+      ! n_max >= 0 is not TRUE