corresed -> coerced in error message (#817)

Author: simonpcouch

R/condense_control.R

@@ -26,7 +26,7 @@ condense_control <- function(x, ref) {
     rlang::abort(
       c(
         glue::glue(
-          "Object of class `{class(x)[1]}` cannot be corresed to ",
+          "Object of class `{class(x)[1]}` cannot be coerced to ",
           "object of class `{class(ref)[1]}`."
         ),
         "The following arguments are missing:",

tests/testthat/_snaps/condense_control.md

@@ -4,7 +4,7 @@
       condense_control(control_parsnip(), ctrl)
     Condition
       Error in `condense_control()`:
-      ! Object of class `control_parsnip` cannot be corresed to object of class `control_parsnip`.
+      ! Object of class `control_parsnip` cannot be coerced to object of class `control_parsnip`.
       * The following arguments are missing:
       * 'allow_par', and 'anotherone'