--- a/VersionDiffBrowser.st	Tue Jun 25 19:55:11 2002 +0200
+++ b/VersionDiffBrowser.st	Wed Jul 03 16:22:35 2002 +0200
@@ -1292,7 +1292,7 @@
     <return: self>
     "
 
-    |m v diffTextView leftView rightView singleView|
+    |m diffTextView leftView rightView singleView|
 
     diffTextView := self diffTextView.
     leftView := diffTextView leftTextView.
@@ -1306,7 +1306,7 @@
     do:[:v |
         m := v editMenu.
         (m selectorAt:#accept) isNil ifTrue:[
-            m addLabels:(resources array:#('-' 'accept'))
+            m addLabels:(resources array:#('-' 'Accept'))
               selectors:(Array with:nil with:#accept)
               after:#copySelection.
         ].
@@ -1327,7 +1327,7 @@
                 ] ifFalse:[     
                      idx := self methodsChangedSelection value.
 
-                     v == self diffTextView leftTextView ifTrue:[
+                     v == leftView ifTrue:[
                         change := (changeSet methodsChanged at:idx) first.
                      ] ifFalse:[
                         change := (changeSet methodsChanged at:idx) second.
@@ -1336,6 +1336,8 @@
                 change apply
             ].
         m selectorAt:#accept put:nil.
+        m enable:#copySelection.
+self halt.
         v menuHolder:m.
         v menuMessage:#value.
     ]
@@ -1946,5 +1948,5 @@
 !VersionDiffBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/VersionDiffBrowser.st,v 1.52 2002-06-25 17:54:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/VersionDiffBrowser.st,v 1.53 2002-07-03 14:22:35 cg Exp $'
 ! !