]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/gopher/gopher.factor
factor: words -> split-words, lines -> split-lines, fix errors
[factor.git] / extra / gopher / gopher.factor
index 83a8dc106a095706947e7a1241181fae10bde41a..5104238c6dc0a151d3623ca1c13f0ad7fc542de1 100644 (file)
@@ -88,7 +88,7 @@ M: gopher-link >url
     ] if ;
 
 : gopher-text ( object -- lines )
-    utf8 decode lines { "." } split1 drop ;
+    utf8 decode split-lines { "." } split1 drop ;
 
 : gopher-text. ( object -- )
     gopher-text [ print ] each ;