DiffTextView.st
changeset 7768 a05e40490dbb
parent 7602 cf179604a91b
child 8209 7c3b00116384
--- a/DiffTextView.st	Tue Mar 27 11:18:46 2007 +0200
+++ b/DiffTextView.st	Tue Mar 27 12:06:02 2007 +0200
@@ -201,12 +201,10 @@
 
     |text1 text2 diffList|
 
-    text1 := t1 asStringCollection.
-    text2 := t2 asStringCollection.
+    text1 := (t1 copyReplaceAll:Character return with:Character cr) asStringCollection.
+    text2 := (t2 copyReplaceAll:Character return with:Character cr) asStringCollection.
 
-"/    Error catch:[
-        diffList := self diffListFor:text1 and:text2.
-"/    ].
+    diffList := self diffListFor:text1 and:text2.
 
     self updateListsFrom:text1 and:text2 diffs:diffList
 
@@ -242,7 +240,7 @@
      v open
     "
 
-    "Modified: / 5.5.1999 / 16:07:13 / cg"
+    "Modified: / 27-03-2007 / 12:06:46 / cg"
 ! !
 
 !DiffTextView methodsFor:'initialization'!
@@ -673,5 +671,5 @@
 !DiffTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DiffTextView.st,v 1.47 2007-01-23 14:44:48 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DiffTextView.st,v 1.48 2007-03-27 10:06:02 cg Exp $'
 ! !