equal
deleted
inserted
replaced
726 " |
726 " |
727 super model:(aModel ? ValueHolder new). |
727 super model:(aModel ? ValueHolder new). |
728 menuField notNil ifTrue:[ menuField model:model ]. |
728 menuField notNil ifTrue:[ menuField model:model ]. |
729 ! ! |
729 ! ! |
730 |
730 |
|
731 !ExtendedComboBox methodsFor:'accessing-components'! |
|
732 |
|
733 menuField |
|
734 ^ menuField |
|
735 ! ! |
|
736 |
731 !ExtendedComboBox methodsFor:'accessing-default menus'! |
737 !ExtendedComboBox methodsFor:'accessing-default menus'! |
732 |
738 |
733 directory:aDirectory |
739 directory:aDirectory |
734 "creates a FileSelectionTree - menu, |
740 "creates a FileSelectionTree - menu, |
735 setting the root to the directory |
741 setting the root to the directory |
1502 ! ! |
1508 ! ! |
1503 |
1509 |
1504 !ExtendedComboBox class methodsFor:'documentation'! |
1510 !ExtendedComboBox class methodsFor:'documentation'! |
1505 |
1511 |
1506 version |
1512 version |
1507 ^ '$Header: /cvs/stx/stx/libwidg2/ExtendedComboBox.st,v 1.21 2000-09-19 11:48:48 cg Exp $' |
1513 ^ '$Header: /cvs/stx/stx/libwidg2/ExtendedComboBox.st,v 1.22 2000-09-20 22:46:29 cg Exp $' |
1508 ! ! |
1514 ! ! |