Can't do snapshot with lua error

because of wide stack trace I can't hide

But this test is still doing the right thing as we want the lua error

```
! Error running quarto CLI from R.
Caused by error:
! Could not evaluate cli `{}` expression: `captions`.
Caused by error:
! object 'captions' not found
```

Author: cderv

tests/testthat/test-render.R

@@ -139,12 +139,12 @@ test_that("{ } are escaped correctly in abort message", {
     )
   })
   withr::local_options(quarto.tests.hide_echo = TRUE)
-  expect_snapshot(
-    error = TRUE,
+  expect_error(
     quarto_render(
       "pdf-error.qmd",
       quiet = FALSE,
       quarto_args = c("--log", "test.log")
-    )
+    ),
+    regexp = "Error returned by quarto CLI(.*)nil value \\(global 'internal_error'\\)"
   )
 })