--- a/ChangesBrowser.st	Sun Jul 01 09:24:12 2018 +0200
+++ b/ChangesBrowser.st	Sun Jul 01 09:26:22 2018 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1990 by Claus Gittinger
 	      All Rights Reserved
@@ -236,7 +238,7 @@
             submenuChannel: menuSpecFile
           )
          (MenuItem
-            label: 'CHANGE'
+            label: 'Change_subst'
             submenuChannel: menuSpecChange
           )
          (MenuItem
@@ -261,6 +263,7 @@
       )
 
     "Modified: / 21-11-2016 / 23:46:22 / cg"
+    "Modified: / 01-07-2018 / 09:24:30 / Claus Gittinger"
 !
 
 menuSpecBrowse
@@ -1562,8 +1565,8 @@
     |panel infoLabel v upperFrame buttonPanel menuPanel mH toolbarMenu tmH
      checkBox oldStyle codeViewBox lbl applyInOriginal|
 
-    leftCodeLabelHolder := 'Current' asValue.
-    rightCodeLabelHolder := 'Change' asValue.    
+    leftCodeLabelHolder := (self class resources string:'Current') asValue.
+    rightCodeLabelHolder := (self class resources string:'Change_subst') asValue.    
 
     "/ oldStyle := true.
     oldStyle := false.
@@ -1749,6 +1752,7 @@
 
     "Modified: / 27-03-1997 / 11:07:07 / stefan"
     "Modified: / 07-12-2017 / 12:28:09 / cg"
+    "Modified: / 01-07-2018 / 09:26:00 / Claus Gittinger"
 !
 
 postRealize
@@ -3778,7 +3782,7 @@
     "/ does not care for VW qualified names
     "/ ^ Parser parseExpression:text inNameSpace:nameSpace.
 
-    (text includesString:'§') ifTrue:[
+    (text includesString:'§') ifTrue:[
         self halt:'should no longer happen'
     ].
 
@@ -6901,7 +6905,7 @@
     "
     clsName := nil.
 
-    (chunkText includesString:'§') ifTrue:[
+    (chunkText includesString:'§') ifTrue:[
         self halt:'should no longer happen'
     ].