equal
deleted
inserted
replaced
2541 ! |
2541 ! |
2542 |
2542 |
2543 treeSelection |
2543 treeSelection |
2544 "called whenever the selection of the treeview has changed" |
2544 "called whenever the selection of the treeview has changed" |
2545 |
2545 |
2546 |view list spec slices size property tabComponent canCutOrCopy canPaste clipboard sel| |
2546 |view list spec slices size property tabComponent| |
2547 |
2547 |
2548 self isModified ifTrue:[ |
2548 self isModified ifTrue:[ |
2549 (self confirm:'Accept modifications in section ' , tabSelection printString asBoldText, '?') ifTrue:[ |
2549 (self confirm:'Accept modifications in section ' , tabSelection printString asBoldText, '?') ifTrue:[ |
2550 self accept |
2550 self accept |
2551 ] |
2551 ] |