equal
deleted
inserted
replaced
2462 identifier := startIdentifier := 0. |
2462 identifier := startIdentifier := 0. |
2463 history := OrderedCollection new. |
2463 history := OrderedCollection new. |
2464 |
2464 |
2465 ! ! |
2465 ! ! |
2466 |
2466 |
2467 !UIObjectView::UndoHistory methodsFor:'activation / deactivation'! |
2467 !UIObjectView::UndoHistory methodsFor:'activation & deactivation'! |
2468 |
2468 |
2469 withinTransaction:aType text:aTextOrNil do:aBlock |
2469 withinTransaction:aType text:aTextOrNil do:aBlock |
2470 "open a transaction; perform the block; at least close the transaction |
2470 "open a transaction; perform the block; at least close the transaction |
2471 " |
2471 " |
2472 (enabled and:[transaction isNil]) ifTrue:[ |
2472 (enabled and:[transaction isNil]) ifTrue:[ |