VersionDiffBrowser.st
changeset 3051 51f53baf1fed
parent 2949 7ce4f684026b
child 3103 228e1cb0ef07
--- a/VersionDiffBrowser.st	Thu Jul 19 16:12:01 2001 +0200
+++ b/VersionDiffBrowser.st	Fri Jul 20 14:17:08 2001 +0200
@@ -760,7 +760,7 @@
         changeA := (methodsChanged at:sel) first.
         changeB := (methodsChanged at:sel) second.
         self withReadCursorDo:[
-            self diffTextView text1:changeA source text2:changeB source.
+            self diffTextView text1:changeA prettyPrintedSource text2:changeB prettyPrintedSource.
             self diffTextView moveToNextChanged
         ].
         self showDiffTextView.
@@ -784,7 +784,7 @@
         self methodsOnlyInBSelection value:nil.
         self methodsChangedSelection value:nil.
         change := self changeSetA at:sel.
-        self methodText value:(change source).    
+        self methodText value:(change prettyPrintedSource).    
         self showSingleTextView.
     ]
 !
@@ -804,7 +804,7 @@
         self methodsOnlyInASelection value:nil.
         self methodsChangedSelection value:nil.
         change := self changeSetB at:sel.
-        self methodText value:(change source).    
+        self methodText value:(change prettyPrintedSource).    
         self showSingleTextView.
     ]
 ! !
@@ -1908,5 +1908,5 @@
 !VersionDiffBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/VersionDiffBrowser.st,v 1.41 2001-01-17 17:38:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/VersionDiffBrowser.st,v 1.42 2001-07-20 12:17:08 cg Exp $'
 ! !