--- a/ChangesBrowser.st	Sun Apr 26 01:18:07 1998 +0200
+++ b/ChangesBrowser.st	Sun Apr 26 01:34:57 1998 +0200
@@ -919,8 +919,8 @@
                     ].
                     (showDiff and:[oldSource notNil and:[newSource notNil]]) ifTrue:[
                         d := DiffTextView 
-                                openOn:oldSource label:'current version (in image)'
-                                and:newSource label:'change version'.
+                                openOn:oldSource label:(resources string:'current version (in image)')
+                                and:newSource label:(resources string:'change version').
                         d label:'method differences'.
                     ]
                 ] ifFalse:[
@@ -938,10 +938,11 @@
     ].
     aStream close.
     showDiff ifFalse:[
+        outcome := (resources string:outcome) withCRs.
         beep ifTrue:[
-            self warn:outcome withCRs.
+            self warn:outcome.
         ] ifFalse:[
-            self information:outcome withCRs.
+            self information:outcome.
         ]
 "/        Transcript showCR:outcome.
     ].
@@ -2694,5 +2695,5 @@
 !ChangesBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.132 1998-04-25 12:32:51 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.133 1998-04-25 23:34:57 cg Exp $'
 ! !