#BUGFIX by cg
authorClaus Gittinger <cg@exept.de>
Tue, 23 Jul 2019 10:13:58 +0200
changeset 24463 31fd800a2942
parent 24462 8018d0dcfa28
child 24464 63a55c7a8813
#BUGFIX by cg class: AbstractOperatingSystem class comment/format in: #speak: changed: #speak:voiceName:
AbstractOperatingSystem.st
--- a/AbstractOperatingSystem.st	Mon Jul 22 20:17:41 2019 +0200
+++ b/AbstractOperatingSystem.st	Tue Jul 23 10:13:58 2019 +0200
@@ -6822,7 +6822,11 @@
 
     "
      OperatingSystem speak:'hello world'
-    "
+     OperatingSystem speak:'üben üben'
+     OperatingSystem speak:'üben üben' voiceName:'Anna'
+    "
+
+    "Modified (comment): / 23-07-2019 / 09:53:03 / Claus Gittinger"
 !
 
 speak:aString voiceName:voiceName
@@ -6836,7 +6840,7 @@
      and call that external program for the speech generation.
      Returns true if ok, false if not"
 
-    |mapping voiceUsed|
+    |mapping voiceUsed stringArg|
 
     (voiceName isNil or:[voiceName = 'default']) ifTrue:[
         voiceUsed := DefaultVoice
@@ -6854,8 +6858,9 @@
                 cmdLine := cmdLineForDefaultVoice
             ] ifFalse:[    
                 cmdLine := cmdLineForVoice
-            ].    
-            ^ self executeCommand:(cmdLine bindWith:voiceUsed with:aString withCEscapes).
+            ].  
+            stringArg := aString copyReplaceAll:(Character nl) withAll:'\n'.
+            ^ self executeCommand:(cmdLine bindWith:voiceUsed with:stringArg).
         ].    
     ].
     
@@ -6885,6 +6890,14 @@
      OperatingSystem speak:'hello world - this is fred' voiceName:'Fred'
      OperatingSystem speak:'hello world - this is awsome' voiceName:'Hysterical'
 
+    Diaresis: 
+     OperatingSystem speak:'üben Österreich ärgerlich' voiceName:'Anna'
+     OperatingSystem speak:'español' voiceName:'Anna' - anna cannot speak spanish!!
+     OperatingSystem speak:'español' voiceName:'Fiona' - fiona neither!!
+     OperatingSystem speak:'español' voiceName:'Diego'
+     OperatingSystem speak:'español' voiceName:'Paulina'
+     OperatingSystem speak:'日本語' voiceName:'Kyoko' - yes, she can say 'Nihongo'
+
      DefaultVoice := 'Fiona'
      DefaultVoice := 'Miora'
      DefaultVoice := 'Amelie'
@@ -6894,7 +6907,7 @@
      OperatingSystem voiceInfo
     "
 
-    "Modified (comment): / 19-07-2019 / 21:29:50 / Claus Gittinger"
+    "Modified (comment): / 23-07-2019 / 10:00:40 / Claus Gittinger"
 !
 
 voiceCommandSpec