factor: update download to return path and using lists

[factor.git] / extra / spelling / spelling.factor

diff --git a/extra/spelling/spelling.factor b/extra/spelling/spelling.factor
index 3e9f0911322466e2822a93545dfe0d6d9a1f14fb..d48bffdc84ca00ffd987b818cca373039877bbb6 100644 (file)
--- a/extra/spelling/spelling.factor
+++ b/extra/spelling/spelling.factor
@@ -1,7 +1,7 @@
 ! Copyright (C) 2010 John Benediktsson
 ! See https://factorcode.org/license.txt for BSD license
 USING: arrays ascii assocs combinators combinators.smart
-http.client io.encodings.ascii io.files io.files.temp kernel
+http.download io.encodings.ascii io.files io.files.temp kernel
 math math.statistics ranges sequences sequences.private sorting
 splitting urls ;
 IN: spelling
@@ -58,7 +58,7 @@ CONSTANT: ALPHABET "abcdefghijklmnopqrstuvwxyz"
 
 MEMO: default-dictionary ( -- counts )
     URL" https://norvig.com/big.txt" "big.txt" temp-file
-    [ ?download-to ] [ load-dictionary ] bi ;
+    download-to load-dictionary ;
 
 : (correct) ( word dictionary -- word/f )
     corrections ?first ;