equal
deleted
inserted
replaced
944 do:specArray |
944 do:specArray |
945 "must run as a separate process; |
945 "must run as a separate process; |
946 otherwise - if started by the app itself - |
946 otherwise - if started by the app itself - |
947 no events will be processed while running" |
947 no events will be processed while running" |
948 |
948 |
949 voice := OperatingSystem bestVoiceForLanguage:(Smalltalk language). |
949 self language:(Smalltalk language). |
950 translate := false. |
950 translate := false. |
951 |
951 |
952 application isNil ifTrue:[ |
952 application isNil ifTrue:[ |
953 application := WindowGroup activeMainApplication. |
953 application := WindowGroup activeMainApplication. |
954 ]. |
954 ]. |
968 (moveTo: NameOfComponent) |
968 (moveTo: NameOfComponent) |
969 ) |
969 ) |
970 " |
970 " |
971 |
971 |
972 "Created: / 23-07-2019 / 10:24:53 / Claus Gittinger" |
972 "Created: / 23-07-2019 / 10:24:53 / Claus Gittinger" |
|
973 "Modified: / 25-07-2019 / 11:48:53 / Claus Gittinger" |
973 ! |
974 ! |
974 |
975 |
975 doCommand:op |
976 doCommand:op |
976 "execute a single command" |
977 "execute a single command" |
977 |
978 |