--- a/BrowserView.st	Tue Feb 20 21:45:56 1996 +0100
+++ b/BrowserView.st	Tue Feb 20 21:50:15 1996 +0100
@@ -5726,31 +5726,32 @@
     |action labels values|
 
     codeView modified ifFalse:[
-	^ true
+        ^ true
     ].
 
     compareOffered ifTrue:[
-	labels := #('abort' 'compare' 'accept' 'continue').
-	values := #(false #compare #accept true).
+        labels := #('cancel' 'compare' 'accept' 'continue').
+        values := #(false #compare #accept true).
     ] ifFalse:[
-	labels := #('abort' 'accept' 'continue').
-	values := #(false #accept true).
+        labels := #('cancel' 'accept' 'continue').
+        values := #(false #accept true).
     ].
 
     action := OptionBox 
-		  request:(resources at:'text has not been accepted.\\Your modifications will be lost when continuing.') withCRs
-		  label:(resources string:'Attention')
-		  form:(WarningBox iconBitmap)
-		  buttonLabels:(resources array:labels)
-		  values:values
-		  default:true.
+                  request:(resources at:'text has not been accepted.\\Your modifications will be lost when continuing.') withCRs
+                  label:(resources string:'Attention')
+                  form:(WarningBox iconBitmap)
+                  buttonLabels:(resources array:labels)
+                  values:values
+                  default:true.
     action ~~ #accept ifTrue:[
-	^ action
+        ^ action
     ].
     codeView accept. 
     ^ true
 
     "Created: 24.11.1995 / 10:54:46 / cg"
+    "Modified: 20.2.1996 / 20:47:51 / cg"
 !
 
 classHierarchyDo:aBlock
@@ -6788,6 +6789,6 @@
 !BrowserView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.103 1996-02-19 23:33:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/BrowserView.st,v 1.104 1996-02-20 20:50:15 cg Exp $'
 ! !
 BrowserView initialize!