equal
deleted
inserted
replaced
1619 !UISelectionPanel methodsFor:'startup / release'! |
1619 !UISelectionPanel methodsFor:'startup / release'! |
1620 |
1620 |
1621 allButOpenInterface:aSpec |
1621 allButOpenInterface:aSpec |
1622 "setup default values |
1622 "setup default values |
1623 " |
1623 " |
1624 super allButOpenInterface:aSpec. |
|
1625 userClass := UserClass. |
1624 userClass := UserClass. |
1626 userSpecs := UserSpecs. |
1625 userSpecs := UserSpecs. |
1627 userLabels := UserLabels. |
1626 userLabels := UserLabels. |
|
1627 ^ super allButOpenInterface:aSpec. |
|
1628 |
|
1629 "Modified: / 5.2.1998 / 20:12:15 / cg" |
1628 ! |
1630 ! |
1629 |
1631 |
1630 closeRequest |
1632 closeRequest |
1631 |sav| |
1633 |sav| |
1632 |
1634 |