equal
deleted
inserted
replaced
4467 |
4467 |
4468 |spec list editor| |
4468 |spec list editor| |
4469 |
4469 |
4470 self acceptOrIgnoreSectionModification. |
4470 self acceptOrIgnoreSectionModification. |
4471 |
4471 |
|
4472 UIListEditor isNil ifTrue:[^ self]. |
|
4473 |
4472 spec := painter specForSelection. |
4474 spec := painter specForSelection. |
4473 spec isNil ifTrue:[^ self]. |
4475 spec isNil ifTrue:[^ self]. |
4474 |
4476 |
4475 "Kludge: subject - fetch the AspectAdaptor behind the TypeConverter" |
4477 "Kludge: subject - fetch the AspectAdaptor behind the TypeConverter" |
4476 list := (specTool aspectFor:listSelector) subject value. |
4478 list := (specTool aspectFor:listSelector) subject value. |