diff --git a/basis/io/directories/directories-tests.factor b/basis/io/directories/directories-tests.factor
index 8067b9f486..8235def1d2 100644
--- a/basis/io/directories/directories-tests.factor
+++ b/basis/io/directories/directories-tests.factor
@@ -161,7 +161,7 @@ io.launcher io.pathnames kernel sequences tools.test ;
     ! Issue #890
     { } [
         "foo" [ make-directories ] keep
-        [ "touch bar" try-output-process ] with-directory
+        [ "bar" touch-file ] with-directory
     ] unit-test
 
     { t } [