equal
deleted
inserted
replaced
|
1 "{ Encoding: utf8 }" |
|
2 |
1 " |
3 " |
2 COPYRIGHT (c) 1999 by eXept Software AG |
4 COPYRIGHT (c) 1999 by eXept Software AG |
3 All Rights Reserved |
5 All Rights Reserved |
4 |
6 |
5 This software is furnished under a license and may be used |
7 This software is furnished under a license and may be used |
97 |
99 |
98 fetchChildren |
100 fetchChildren |
99 "should compute the list of children via the model. |
101 "should compute the list of children via the model. |
100 Be aware, that the somewhat stupid 'optimization' of how the model is fetched may lead to |
102 Be aware, that the somewhat stupid 'optimization' of how the model is fetched may lead to |
101 a O(n*log n) or even O(n^2) behavior here. |
103 a O(n*log n) or even O(n^2) behavior here. |
102 *** to optimize: redefine by subClass" |
104 *** to optimize: redefine #model by subClass" |
103 |
105 |
104 |model childrenFromModel| |
106 |model childrenFromModel| |
105 |
107 |
106 (model := self model) notNil ifTrue:[ |
108 (model := self model) notNil ifTrue:[ |
107 childrenFromModel := model childrenFor:self |
109 childrenFromModel := model childrenFor:self |
285 ! ! |
287 ! ! |
286 |
288 |
287 !HierarchicalItem class methodsFor:'documentation'! |
289 !HierarchicalItem class methodsFor:'documentation'! |
288 |
290 |
289 version |
291 version |
290 ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalItem.st,v 1.114 2015-05-04 14:05:45 cg Exp $' |
292 ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalItem.st,v 1.115 2015-05-15 09:23:54 cg Exp $' |
291 ! |
293 ! |
292 |
294 |
293 version_CVS |
295 version_CVS |
294 ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalItem.st,v 1.114 2015-05-04 14:05:45 cg Exp $' |
296 ^ '$Header: /cvs/stx/stx/libwidg2/HierarchicalItem.st,v 1.115 2015-05-15 09:23:54 cg Exp $' |
295 ! ! |
297 ! ! |
296 |
298 |