factor: words -> split-words, lines -> split-lines, fix errors

[factor.git] / extra / wikipedia / wikipedia.factor

diff --git a/extra/wikipedia/wikipedia.factor b/extra/wikipedia/wikipedia.factor
index 3e1d0c37319602184e004cf39f398d38b6c2ea23..5778ac7001b205d4e90e97ffd7a7ac18ca3f00fe 100644 (file)
--- a/extra/wikipedia/wikipedia.factor
+++ b/extra/wikipedia/wikipedia.factor
@@ -75,7 +75,7 @@ PRIVATE>
 : article. ( name -- )
     wikipedia-url http-get nip parse-html
     "content" find-by-id-between
-    html-text lines
-    [ [ blank? ] trim ] map harvest [
+    html-text split-lines
+    [ [ ascii:blank? ] trim ] map harvest [
         html-unescape 72 wrap-string print nl
     ] each ;