From 0fe5b2d90f4d333e1fde856d41cbe5becbbc32ca Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Tue, 18 Nov 2014 14:11:13 -0800 Subject: [PATCH] io.directories: Add unit test for #890. --- basis/io/directories/directories-tests.factor | 13 ++++++++++--- 1 file changed, 10 insertions(+), 3 deletions(-) diff --git a/basis/io/directories/directories-tests.factor b/basis/io/directories/directories-tests.factor index 19d6d8e548..9729b4554b 100644 --- a/basis/io/directories/directories-tests.factor +++ b/basis/io/directories/directories-tests.factor @@ -1,7 +1,7 @@ USING: continuations destructors io io.directories io.directories.hierarchy io.encodings.ascii io.encodings.utf8 -io.files io.files.info io.files.temp io.pathnames kernel -sequences tools.test ; +io.files io.files.info io.files.temp io.launcher io.pathnames +kernel sequences tools.test ; IN: io.directories.tests [ { "kernel" } ] [ @@ -189,4 +189,11 @@ IN: io.directories.tests [ ] [ "copy-tree-test" temp-file delete-tree ] unit-test [ ] [ "resource:deleteme" touch-file ] unit-test -[ ] [ "resource:deleteme" delete-file ] unit-test \ No newline at end of file +[ ] [ "resource:deleteme" delete-file ] unit-test + +! Issue #890 + +{ } [ + "foo" temp-file [ make-directories ] keep + [ "touch bar" try-output-process ] with-directory +] unit-test \ No newline at end of file