equal
deleted
inserted
replaced
2606 diffs := self selection ? #(). |
2606 diffs := self selection ? #(). |
2607 loadA := menu atNameKey:#LoadVersionA. |
2607 loadA := menu atNameKey:#LoadVersionA. |
2608 loadA disable. |
2608 loadA disable. |
2609 loadB := menu atNameKey:#LoadVersionB. |
2609 loadB := menu atNameKey:#LoadVersionB. |
2610 loadB disable. |
2610 loadB disable. |
2611 "/ cg: what is the purpose of this select? |
2611 |
2612 (diffs select:[:e | true ]) do:[:diff | |
2612 diffs do:[:diff | |
2613 diff versionA |
2613 diff versionA |
2614 ifNotNil:[ |
2614 ifNotNil:[ |
2615 loadA |
2615 loadA |
2616 label:('Load version ' , diff versionALabel); |
2616 label:('Load version ' , diff versionALabel); |
2617 enable. |
2617 enable. |