Deploying to gh-pages from @ eea12e6 🚀

Author: hadley

articles/mocking.html

@@ -291,7 +291,7 @@ function to mock.
 ``` r
 unix_time <- function() unclass(Sys.time())
 unix_time()
-#> [1] 1767736878
+#> [1] 1767741509
 ```
 
 Now I’m going to create a function factory that makes it easy to compute
@@ -308,7 +308,7 @@ elapsed <- function() {
 timer <- elapsed()
 Sys.sleep(0.5)
 timer()
-#> [1] 0.5017884
+#> [1] 0.5018544
 ```
 
 Imagine trying to test this function without mocking! You’d probably

articles/mocking.md

@@ -386,7 +386,7 @@ test_that("generates actionable error message", {
 #>   safe_write_lines(letters, path)
 #> Condition
 #>   Error in `safe_write_lines()`:
-#>   ! '/tmp/Rtmp9mjXJk/file29606697dff7' already exists.
+#>   ! '/tmp/RtmpYpnRQw/file293643d57760' already exists.
 #>   i Set `overwrite = TRUE` to overwrite
 #> Test passed with 1 success 🎊.
 ```
@@ -402,8 +402,8 @@ test_that("generates actionable error message", {
 #>     safe_write_lines(letters, path)
 #>   Condition
 #>     Error in `safe_write_lines()`:
-#> -   ! '/tmp/Rtmp9mjXJk/file29606697dff7' already exists.
-#> +   ! '/tmp/Rtmp9mjXJk/file296044bb4098' already exists.
+#> -   ! '/tmp/RtmpYpnRQw/file293643d57760' already exists.
+#> +   ! '/tmp/RtmpYpnRQw/file2936e0f21ea' already exists.
 #>     i Set `overwrite = TRUE` to overwrite
 #> * Run `testthat::snapshot_accept("snapshotting.Rmd")` to accept the change.
 #> * Run `testthat::snapshot_review("snapshotting.Rmd")` to review the change.

articles/snapshotting.html

@@ -4,6 +4,11 @@
 
 CRAN release: 2025-11-25
 
+- [`expect_snapshot_file()`](https://testthat.r-lib.org/reference/expect_snapshot_file.md)
+  correctly reports file name if duplicated
+  ([@MichaelChirico](https://github.com/MichaelChirico),
+  [\#2296](https://github.com/r-lib/testthat/issues/2296)).
+
 - Fixed support for `shinytest2::AppDriver$expect_values()` screenshot
   snapshot failing on CI
   ([\#2293](https://github.com/r-lib/testthat/issues/2293),

articles/snapshotting.md

@@ -11,7 +11,7 @@ articles:
   special-files: special-files.html
   test-fixtures: test-fixtures.html
   third-edition: third-edition.html
-last_built: 2026-01-06T22:00Z
+last_built: 2026-01-06T23:17Z
 urls:
   reference: https://testthat.r-lib.org/reference
   article: https://testthat.r-lib.org/articles

news/index.html

@@ -129,7 +129,7 @@ save_png <- function(code, width = 400, height = 400) {
 }
 path <- save_png(plot(1:5))
 path
-#> [1] "/tmp/RtmpA8dFtx/file1bee4efeee5f.png"
+#> [1] "/tmp/RtmpK7psrQ/file1bdf6214b54c.png"
 
 if (FALSE) { # \dontrun{
 expect_snapshot_file(save_png(hist(mtcars$mpg)), "plot.png")