use ?delete-file instead of [ delete-file ] ignore-errors.

[factor.git] / extra / site-watcher / site-watcher-tests.factor

diff --git a/extra/site-watcher/site-watcher-tests.factor b/extra/site-watcher/site-watcher-tests.factor
index 77ae155f4a15988c3d0178a7ec71f8fd77723c20..02f6bdbc8d994068c19cf220c9c429219263518e 100644 (file)
--- a/extra/site-watcher/site-watcher-tests.factor
+++ b/extra/site-watcher/site-watcher-tests.factor
@@ -4,7 +4,7 @@ USING: continuations db db.tuples io.directories io.files.temp kernel
 locals sequences site-watcher.db tools.test webapps.utils ;
 IN: site-watcher.tests
 
-[ "site-watcher.db" temp-file delete-file ] ignore-errors
+"site-watcher.db" temp-file ?delete-file
 
 :: fake-sites ( -- seq )
     "site-watcher.db" <temp-sqlite-db> [