equal
deleted
inserted
replaced
648 |
648 |
649 infoLabelHolder |
649 infoLabelHolder |
650 "returns the info label as value holder" |
650 "returns the info label as value holder" |
651 |
651 |
652 masterApplication notNil ifTrue:[ |
652 masterApplication notNil ifTrue:[ |
|
653 builder aspectAt:#useAlienInfoLabelHolder put:true. |
653 ^ masterApplication infoLabelHolder |
654 ^ masterApplication infoLabelHolder |
654 ]. |
655 ]. |
655 ^ super infoLabelHolder |
656 ^ super infoLabelHolder |
656 ! |
657 ! |
657 |
658 |
1302 detectItemWithKey:aKey |
1303 detectItemWithKey:aKey |
1303 "returns the item assigned to a helpKey or nil |
1304 "returns the item assigned to a helpKey or nil |
1304 " |
1305 " |
1305 |key| |
1306 |key| |
1306 |
1307 |
1307 aKey size ~~ 0 ifTrue:[ |
1308 aKey isEmptyOrNil ifTrue:[ ^ nil ]. |
1308 key := aKey asSymbol. |
1309 key := aKey asSymbol. |
1309 |
1310 |
1310 self do:[:anItem| |
1311 self do:[:anItem| |
1311 anItem helpKey == key ifTrue:[ ^ anItem ]. |
1312 anItem helpKey == key ifTrue:[ ^ anItem ]. |
1312 ] |
|
1313 ]. |
1313 ]. |
1314 ^ nil |
1314 ^ nil |
1315 ! ! |
1315 ! ! |
1316 |
1316 |
1317 !UIHelpTool::KeyItem class methodsFor:'instance creation'! |
1317 !UIHelpTool::KeyItem class methodsFor:'instance creation'! |