diff --git a/collects/teachpack/2htdp/scribblings/batch-io.scrbl b/collects/teachpack/2htdp/scribblings/batch-io.scrbl
index 0fbb937a7e..8530ce1833 100644
--- a/collects/teachpack/2htdp/scribblings/batch-io.scrbl
+++ b/collects/teachpack/2htdp/scribblings/batch-io.scrbl
@@ -144,5 +144,6 @@ There is only one writer function at the moment:
 ]
 
 @(parameterize ([current-directory here])
-   (delete-file "output.txt"))
+   (with-handlers ([exn:fail:filesystem? void])
+     (delete-file "output.txt")))