io.directories: Add with-resource-directory word and use it.

[factor.git] / basis / tools / deploy / test / test.factor

diff --git a/basis/tools/deploy/test/test.factor b/basis/tools/deploy/test/test.factor
index b04abe7d7e9e285dd7ce33c5a338a6d1e02ffcde..db016f15c34f925eb6e85d95983749ec882eae70 100644 (file)
--- a/basis/tools/deploy/test/test.factor
+++ b/basis/tools/deploy/test/test.factor
@@ -9,10 +9,10 @@ IN: tools.deploy.test
 
 : shake-and-bake ( vocab -- )
     [ test-image temp-file delete-file ] ignore-errors
-    "resource:" [
+    [
         [ vm test-image temp-file ] dip
         dup deploy-config make-deploy-image drop
-    ] with-directory ;
+    ] with-resource-directory ;
 
 ERROR: image-too-big actual-size max-size ;