--- a/EventMonitor.st	Mon Mar 02 12:28:11 2020 +0100
+++ b/EventMonitor.st	Tue Mar 03 09:34:56 2020 +0100
@@ -372,14 +372,14 @@
     outputStream := aStream.
 
     labelHolder value:nil.
-    where := 'the Transcript'.
+    where := resources string:'the Transcript'.
     outputStream == Stdout ifTrue:[
         where := 'standard output'.
     ].
     outputStream == Stderr ifTrue:[
         where := 'standard error'.
     ].
-    labelHolder value:(c'See event trace\non the ',where).
+    labelHolder value:((resources stringWithCRs:'See event trace\on the '),where).
 
     self invalidate.