--- a/DiffTextView.st	Wed Jul 24 23:43:35 2002 +0200
+++ b/DiffTextView.st	Thu Jul 25 12:47:51 2002 +0200
@@ -120,8 +120,8 @@
     sourceB := aStream contents asString.
 
     v := self 
-                openOn:sourceA label:lblA
-                and:sourceB label:lblB.      
+            openOn:sourceA label:lblA
+            and:sourceB label:lblB.      
     v label:title.
     ^ v
 !
@@ -130,8 +130,11 @@
     "provided for protocol compatibility with the VersionDiffBrowser;
      actually, the class is ignored here"
 
-    ^ self openOnClass:someClass labelA:lblA sourceA:sourceA labelB:lblB sourceB:sourceB 
-           title:'comparing ' , someClass name.
+    ^ self 
+        openOnClass:someClass 
+        labelA:lblA sourceA:sourceA 
+        labelB:lblB sourceB:sourceB 
+        title:'Comparing ' , someClass name.
 !
 
 openOnClass:someClass labelA:lblA sourceA:sourceA labelB:lblB sourceB:sourceB title:title
@@ -139,7 +142,10 @@
      actually, the class is ignored here"
 
     ^ self
-        openOnClass:someClass labelA:lblA sourceA:sourceA labelB:lblB sourceB:sourceB title:title ifSame:nil
+        openOnClass:someClass 
+        labelA:lblA sourceA:sourceA 
+        labelB:lblB sourceB:sourceB 
+        title:title ifSame:nil
 !
 
 openOnClass:someClass labelA:lblA sourceA:sourceA labelB:lblB sourceB:sourceB title:title ifSame:sameAction
@@ -149,8 +155,8 @@
     |v|
 
     v := self 
-                openOn:sourceA label:lblA
-                and:sourceB label:lblB.      
+            openOn:sourceA label:lblA
+            and:sourceB label:lblB.      
     v topView label:title.
     ^ v
 ! !
@@ -620,5 +626,5 @@
 !DiffTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DiffTextView.st,v 1.34 2002-06-21 14:41:41 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DiffTextView.st,v 1.35 2002-07-25 10:47:51 cg Exp $'
 ! !