--- a/VersionDiffBrowser.st	Thu Sep 14 17:13:46 2000 +0200
+++ b/VersionDiffBrowser.st	Thu Sep 14 18:28:27 2000 +0200
@@ -1138,8 +1138,7 @@
         self warn:'The generated patch file will not be able to validate/update the class version'.
     ].
 
-self halt.
-
+self halt:'not yet finished'.
 !
 
 inspectSelectedChangeInA
@@ -1212,7 +1211,7 @@
     do:[:v |
         m := v editMenu.
         (m selectorAt:#accept) isNil ifTrue:[
-            m addLabels:#('-' 'accept')
+            m addLabels:(resources array:#('-' 'accept'))
               selectors:(Array with:nil with:#accept)
               after:#copySelection.
         ].
@@ -1539,12 +1538,12 @@
         theClassChangeSet labelA:(versionCompared := aClass revision).
     ] ifFalse:[
         aVersionA == #newest ifTrue:[
-            theClassChangeSet labelA:'newest'.
+            theClassChangeSet labelA:(VersionDiffBrowser resources string:'newest').
         ] ifFalse:[
             theClassChangeSet labelA:versionCompared.
         ]
     ].
-    theClassChangeSet labelB:'current'.
+    theClassChangeSet labelB:(VersionDiffBrowser resources string:'current').
     theChangeSetA := self changeSetForClass: aClass andRevision: versionCompared.
     theChangeSetB := self changeSetForClass: aClass.
     theChangeSetA isNil
@@ -1721,5 +1720,5 @@
 !VersionDiffBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/VersionDiffBrowser.st,v 1.34 2000-09-03 14:38:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/VersionDiffBrowser.st,v 1.35 2000-09-14 16:28:27 cg Exp $'
 ! !