Mercurial Mercurial > hg > stx-libbasic / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
#FEATURE by cg
authorClaus Gittinger <cg@exept.de>
Fri, 06 Mar 2020 19:38:17 +0100
changeset 25328 455bbc11e42c
parent 25327 75869bc8e5c0
child 25329 cda5f439b63b
#FEATURE by cg class: Win32OperatingSystem class changed: #bestVoiceForLanguage:
Win32OperatingSystem.st file | annotate | diff | comparison | revisions 
--- a/Win32OperatingSystem.st	Fri Mar 06 19:35:39 2020 +0100
+++ b/Win32OperatingSystem.st	Fri Mar 06 19:38:17 2020 +0100
@@ -11669,8 +11669,16 @@
 bestVoiceForLanguage:lang
     "OS specific - to be redefined for linux, windows and OSX"
 
-    (lang startsWith:'de') ifTrue:[ ^ 'Microsoft Hedda Desktop' ].
-    (lang startsWith:'en') ifTrue:[ ^ 'Microsoft Zira Desktop' ].
+    "/ todo: scan voiceInfo
+    (lang startsWith:'de' caseSensitive:false) ifTrue:[ ^ 'Microsoft Hedda Desktop' ].
+    (lang startsWith:'en' caseSensitive:false) ifTrue:[ ^ 'Microsoft Zira Desktop' ].
+    (lang startsWith:'fr' caseSensitive:false) ifTrue:[ ^ 'Microsoft Hortense Desktop' ].
+    (lang startsWith:'it' caseSensitive:false) ifTrue:[ ^ 'Microsoft Elsa Desktop' ].
+    (lang startsWith:'es' caseSensitive:false) ifTrue:[ ^ 'Microsoft Helena Desktop' ].
+    (lang startsWith:'pt' caseSensitive:false) ifTrue:[ ^ 'Microsoft Helia Desktop' ].
+    (lang startsWith:'zh' caseSensitive:false) ifTrue:[ ^ 'Microsoft Huihui Desktop' ].
+    (lang startsWith:'ja' caseSensitive:false) ifTrue:[ ^ 'Microsoft Haruka Desktop' ].
+    (lang startsWith:'ru' caseSensitive:false) ifTrue:[ ^ 'Microsoft Irina Desktop' ].
     ^ nil
 
     "Created: / 23-07-2019 / 10:21:08 / Claus Gittinger"
hg/stx-libbasic