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

[factor.git] / extra / text-to-speech / text-to-speech.factor

diff --git a/extra/text-to-speech/text-to-speech.factor b/extra/text-to-speech/text-to-speech.factor
index f2c4e498efd9c00dfd34ce6a84e1232b36432b71..5e72d506903b81528efddd5a97e279994ba21865 100644 (file)
--- a/extra/text-to-speech/text-to-speech.factor
+++ b/extra/text-to-speech/text-to-speech.factor
@@ -2,8 +2,8 @@
 ! See http://factorcode.org/license.txt for BSD license
 
 USING: combinators command-line generic io kernel math
-math.text.english namespaces present sequences strings system
-ui.operations vocabs ;
+math.text.english namespaces present sequences splitting
+strings system ui.operations vocabs ;
 
 IN: text-to-speech
 
@@ -32,7 +32,7 @@ M: integer speak number>text speak-text ;
     command-line get [
         [ speak ] each-line
     ] [
-        unwords speak
+        join-words speak
     ] if-empty ;
 
 MAIN: speak-main