diff --git a/basis/io/launcher/unix/unix-tests.factor b/basis/io/launcher/unix/unix-tests.factor
index da2fb3c5bb..06037151c2 100644
--- a/basis/io/launcher/unix/unix-tests.factor
+++ b/basis/io/launcher/unix/unix-tests.factor
@@ -95,15 +95,14 @@ IN: io.launcher.unix.tests
 ] unit-test
 
 { "hi\n" } [
-    temp-directory [
+    [
         [ "aloha" delete-file ] ignore-errors
         <process>
             { "echo" "hi" } >>command
             "aloha" >>stdout
         try-process
-    ] with-directory
-    temp-directory "aloha" append-path
-    utf8 file-contents
+        "aloha" utf8 file-contents
+    ] with-temp-directory
 ] unit-test
 
 [ "append-test" arch-temp-file delete-file ] ignore-errors