http.download: ?download-to -> download-to-once

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

diff --git a/extra/spelling/spelling.factor b/extra/spelling/spelling.factor
index d48bffdc84ca00ffd987b818cca373039877bbb6..f3c512f9cd2a8eaafeb603eff2a273a4c7065dc9 100644 (file)
--- a/extra/spelling/spelling.factor
+++ b/extra/spelling/spelling.factor
@@ -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 ;
+    download-once-to load-dictionary ;
 
 : (correct) ( word dictionary -- word/f )
     corrections ?first ;