equal
deleted
inserted
replaced
473 self talking ifTrue:[ |
473 self talking ifTrue:[ |
474 talkDone := Semaphore new. |
474 talkDone := Semaphore new. |
475 [ |
475 [ |
476 |sentence| |
476 |sentence| |
477 sentence := (sentenceOrNil ? xLatedMessage) copy withCRs replaceAny:c'\t' with:(Character space). |
477 sentence := (sentenceOrNil ? xLatedMessage) copy withCRs replaceAny:c'\t' with:(Character space). |
478 self tell:(sentenceOrNil ? xLatedMessage). |
478 sentence := sentence copy withCRs replaceAny:c'\n\r' with:(Character space). |
|
479 self tell:sentence. |
479 talkDone signal |
480 talkDone signal |
480 ] fork. |
481 ] fork. |
481 |
482 |
482 "/ |
483 "/ |
483 "/ allow speaker some headoff |
484 "/ allow speaker some headoff |