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 |
280 ]. |
282 ]. |
281 super list:aList |
283 super list:aList |
282 ! |
284 ! |
283 |
285 |
284 newDefaultList |
286 newDefaultList |
285 "creates and returns a new default list class, on default a HierarchicalList |
287 "creates and returns a new default list class; by default, a HierarchicalList" |
286 " |
288 |
287 |list| |
289 |list| |
288 |
290 |
289 list := HierarchicalList new. |
291 list := HierarchicalList new. |
290 list showRoot:(showRoot ? true). |
292 list showRoot:(showRoot ? true). |
291 ^ list |
293 ^ list |