fix some tests broken by my io.files.unique change.

diff --git a/basis/csv/csv-tests.factor b/basis/csv/csv-tests.factor
index 8afefbaf662e3a0f76fc999ad5928caf3a17499d..533c6f00ec748006a4fdb78684c03a672fa692b9 100644 (file)
--- a/basis/csv/csv-tests.factor
+++ b/basis/csv/csv-tests.factor
@@ -1,6 +1,6 @@
 USING: io.streams.string csv tools.test kernel strings
-io.pathnames io.files.unique io.encodings.utf8 io.files
-io.directories ;
+io.pathnames io.files.temp io.files.unique io.encodings.utf8
+io.files io.directories ;
 IN: csv.tests
 
 ! I like to name my unit tests

diff --git a/basis/ftp/server/server-tests.factor b/basis/ftp/server/server-tests.factor
index edb811370465f6836413151d3ff828f1b39755b5..7f5148d1e790c53f004c0ba0be167bc360bfedf4 100644 (file)
--- a/basis/ftp/server/server-tests.factor
+++ b/basis/ftp/server/server-tests.factor
@@ -1,6 +1,6 @@
 USING: calendar ftp.server io.encodings.ascii io.files
-io.files.unique namespaces threads tools.test kernel
-io.servers ftp.client accessors urls
+io.files.temp io.files.unique namespaces threads tools.test
+kernel io.servers ftp.client accessors urls
 io.pathnames io.directories sequences fry io.backend
 continuations ;
 FROM: ftp.client => ftp-get ;

diff --git a/basis/io/directories/search/search-tests.factor b/basis/io/directories/search/search-tests.factor
index 3d7284f9d68ebbceb653bdf9d0c7f473dd10b08a..15e501da5b2b9156c06832178d9d72d96e657776 100644 (file)
--- a/basis/io/directories/search/search-tests.factor
+++ b/basis/io/directories/search/search-tests.factor
@@ -1,7 +1,7 @@
 USING: combinators.smart io.directories
 io.directories.hierarchy io.directories.search io.files
-io.files.unique io.pathnames kernel namespaces sequences
-sorting strings tools.test ;
+io.files.temp io.files.unique io.pathnames kernel namespaces
+sequences sorting strings tools.test ;
 IN: io.directories.search.tests
 
 { t } [

diff --git a/basis/io/files/links/unix/unix-tests.factor b/basis/io/files/links/unix/unix-tests.factor
index 2ab39514f5dea118327e72db9ae88d5fd1e7a39f..1222ed73ae11ab4330b739a33a62ab69fea1b2cc 100644 (file)
--- a/basis/io/files/links/unix/unix-tests.factor
+++ b/basis/io/files/links/unix/unix-tests.factor
@@ -1,6 +1,6 @@
 USING: io.directories io.files.links tools.test sequences
-io.files.unique tools.files fry math kernel math.parser
-io.pathnames namespaces ;
+io.files.temp io.files.unique tools.files fry math kernel
+math.parser io.pathnames namespaces ;
 IN: io.files.links.unix.tests
 
 : make-test-links ( n path -- )

diff --git a/basis/io/files/unique/unique-tests.factor b/basis/io/files/unique/unique-tests.factor
index 108c86208833943814ce62ab1c8f3c109581cde3..f71a28f78dab2556279a5092237327e4b374de5e 100644 (file)
--- a/basis/io/files/unique/unique-tests.factor
+++ b/basis/io/files/unique/unique-tests.factor
@@ -1,7 +1,7 @@
-USING: accessors io.directories io.directories.hierarchy
-io.encodings.ascii io.files io.files.info io.files.temp
-io.files.unique io.pathnames kernel namespaces sequences strings
-tools.test ;
+USING: accessors continuations io.directories
+io.directories.hierarchy io.encodings.ascii io.files
+io.files.info io.files.temp io.files.unique io.pathnames kernel
+namespaces sequences strings tools.test ;
 IN: io.files.unique.tests
 
 { 123 } [

diff --git a/extra/graphviz/graphviz-tests.factor b/extra/graphviz/graphviz-tests.factor
index 4cd58c1260cf21d4de22a5212367109743679022..1746c23adc3c6cb3adb5791e0648e4fa94cb9809 100644 (file)
--- a/extra/graphviz/graphviz-tests.factor
+++ b/extra/graphviz/graphviz-tests.factor
@@ -2,10 +2,10 @@ USING: accessors arrays assocs combinators.short-circuit
 continuations formatting graphviz graphviz.attributes
 graphviz.dot graphviz.notation graphviz.render
 graphviz.render.private images.loader.private io.directories
-io.directories.hierarchy io.files io.files.unique io.launcher
-io.pathnames kernel locals make math math.combinatorics
-math.parser memoize namespaces sequences sequences.extras sets
-splitting system tools.test ;
+io.directories.hierarchy io.files io.files.temp io.files.unique
+io.launcher io.pathnames kernel locals make math
+math.combinatorics math.parser memoize namespaces sequences
+sequences.extras sets splitting system tools.test ;
 IN: graphviz.tests
 
 ! XXX hack
@@ -48,9 +48,11 @@ SYMBOLS: supported-layouts supported-formats ;
     supported-formats get-global next! :> -T
     supported-layouts get-global next! :> -K
     [
-        graph "smoke-test" -T -K graphviz
-        "smoke-test" graphviz-output-appears-to-exist?
-    ] cleanup-unique-working-directory ;
+        [
+            graph "smoke-test" -T -K graphviz
+            "smoke-test" graphviz-output-appears-to-exist?
+        ] cleanup-unique-directory
+    ] with-temp-directory ;
 
 : preview-smoke-test ( graph -- pass? )
     f "pass?" [