factor: update download to return path and using lists

[factor.git] / basis / unicode / collation / collation-tests.factor

diff --git a/basis/unicode/collation/collation-tests.factor b/basis/unicode/collation/collation-tests.factor
index eb9438a12f9a96b1ee2ab3e9161efd320792dbf3..2cf37e1b1ed2a88857f7e08a3167df1326ac4623 100644 (file)
--- a/basis/unicode/collation/collation-tests.factor
+++ b/basis/unicode/collation/collation-tests.factor
@@ -1,7 +1,7 @@
 USING: arrays assocs grouping hash-sets http.client
-io.encodings.binary io.encodings.string io.encodings.utf8
-io.files io.files.temp kernel math math.order math.parser
-sequences sets splitting strings tools.test unicode ;
+http.download io.encodings.binary io.encodings.string
+io.encodings.utf8 io.files io.files.temp kernel math math.order
+math.parser sequences sets splitting strings tools.test unicode ;
 IN: unicode.collation.tests
 
 : test-equality ( str1 str2 -- ? ? ? ? )
@@ -19,7 +19,7 @@ IN: unicode.collation.tests
 
 : collation-test-lines ( -- lines )
     "https://downloads.factorcode.org/misc/UCA/15.1.0/CollationTest_SHIFTED.txt"
-    "CollationTest_SHIFTED_15.1.0.txt" cache-file [ ?download-to ] keep
+    "CollationTest_SHIFTED_15.1.0.txt" cache-file download-to
     utf8 file-lines [ "#" head? ] reject harvest ;
 
 : parse-collation-test-shifted ( -- lines )