equal
deleted
inserted
replaced
2404 |size| |
2404 |size| |
2405 |
2405 |
2406 columnView notNil ifTrue:[ |
2406 columnView notNil ifTrue:[ |
2407 |previewColumns columnItems columnList| |
2407 |previewColumns columnItems columnList| |
2408 columnList := List new. |
2408 columnList := List new. |
2409 previewColumns := columns deepCopy. |
2409 previewColumns := OrderedCollection new. |
2410 size := previewColumns size. |
2410 |
2411 |
2411 (size := columns size) ~~ 0 ifTrue:[ |
2412 size ~~ 0 ifTrue:[ |
2412 columns do:[:aCol| |
|
2413 previewColumns add:(aCol copy) |
|
2414 ]. |
2413 previewColumns keysAndValuesDo:[:anIndex :column| |
2415 previewColumns keysAndValuesDo:[:anIndex :column| |
2414 column readSelector: #at:; |
2416 column readSelector: #at:; |
2415 writeSelector: #at:put:; |
2417 writeSelector: #at:put:; |
2416 backgroundSelector:nil; |
2418 backgroundSelector:nil; |
2417 foregroundSelector:nil; |
2419 foregroundSelector:nil; |