class: DiffTextView
authorClaus Gittinger <cg@exept.de>
Mon, 11 Mar 2013 12:51:45 +0100
changeset 12455 dab98ae0d660
parent 12454 b223911944e4
child 12456 87fdcd23e545
class: DiffTextView changed: #processDiffList:from:and:
DiffTextView.st
--- a/DiffTextView.st	Mon Mar 11 04:25:48 2013 +0000
+++ b/DiffTextView.st	Mon Mar 11 12:51:45 2013 +0100
@@ -420,10 +420,10 @@
                     useColors ifTrue:[
                         (l2 size >= idx1
                         and:[(s2 := line2 := l2 at:idx1) notNil
-                        and:[(s2 asString string withoutSeparators = (text1 at:idx1) string withoutSeparators)
+                        and:[(line2 asString string withoutSeparators = (line1 := text1 at:idx1) asString string withoutSeparators)
                               "/ or:[(s2 asString withoutSeparators withTabsExpanded = (text1 at:idx1) withoutSeparators withTabsExpanded)]  
                         ]]) ifTrue:[
-                            line1 := Text string:(text1 at:idx1) 
+                            line1 := Text string:line1 
                                          foregroundColor:changedSpacesOnlyColor
                                          backgroundColor:changedSpacesOnlyBgColor.
                             line2 := Text string:line2 asString 
@@ -583,10 +583,10 @@
 !DiffTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DiffTextView.st,v 1.57 2013-02-01 15:13:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DiffTextView.st,v 1.58 2013-03-11 11:51:45 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/DiffTextView.st,v 1.57 2013-02-01 15:13:02 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DiffTextView.st,v 1.58 2013-03-11 11:51:45 cg Exp $'
 ! !