2412 (theVersionA := self versionA) notNil ifTrue:[ |
2412 (theVersionA := self versionA) notNil ifTrue:[ |
2413 self diffTextLabelA value:(makeLabel value:theVersionA). |
2413 self diffTextLabelA value:(makeLabel value:theVersionA). |
2414 self onlyInALabelHolder value:('Only in ' , theVersionA). |
2414 self onlyInALabelHolder value:('Only in ' , theVersionA). |
2415 (self componentAt:#OnlyInALabel) |
2415 (self componentAt:#OnlyInALabel) |
2416 foregroundColor:Color white; |
2416 foregroundColor:Color white; |
2417 backgroundColor:Color green darkened. |
2417 backgroundColor:Color darkGreen. |
2418 ]. |
2418 ]. |
2419 (theVersionB :=self versionB) notNil ifTrue:[ |
2419 (theVersionB :=self versionB) notNil ifTrue:[ |
2420 self diffTextLabelB value:(makeLabel value:theVersionB). |
2420 self diffTextLabelB value:(makeLabel value:theVersionB). |
2421 self onlyInBLabelHolder value:('Only in ' , theVersionB). |
2421 self onlyInBLabelHolder value:('Only in ' , theVersionB). |
2422 (self componentAt:#OnlyInBLabel) |
2422 (self componentAt:#OnlyInBLabel) |
2423 foregroundColor:Color white; |
2423 foregroundColor:Color white; |
2424 backgroundColor:Color red darkened. |
2424 backgroundColor:Color darkRed. |
2425 ]. |
2425 ]. |
2426 |
2426 |
2427 self changedLabelHolder value:('Different'). |
2427 self changedLabelHolder value:('Different'). |
2428 |
2428 |
2429 "Modified: / 13-10-2006 / 01:07:08 / cg" |
2429 "Modified: / 13-10-2006 / 01:07:08 / cg" |
|
2430 "Modified: / 13-03-2019 / 21:19:13 / Claus Gittinger" |
2430 ! |
2431 ! |
2431 |
2432 |
2432 updateLists |
2433 updateLists |
2433 "walk over the changeSet(s) and setup the 3 lists: |
2434 "walk over the changeSet(s) and setup the 3 lists: |
2434 onlyInA, changed, onlyInB, |
2435 onlyInA, changed, onlyInB, |