author | Claus Gittinger <cg@exept.de> |
Fri, 19 Jun 1998 01:59:16 +0200 | |
changeset 869 | 65588145cd06 |
parent 868 | dfa9d6df10d8 |
child 870 | 9b565069344d |
--- a/UISpecificationTool.st Fri Jun 19 01:58:40 1998 +0200 +++ b/UISpecificationTool.st Fri Jun 19 01:59:16 1998 +0200 @@ -627,9 +627,11 @@ frame := self windowFrame. appl := builder application. - builder := UIBuilder new. + builder := self builderClass new. builder application:appl. builder componentAt:#Frame put:frame. + + "Modified: / 19.6.1998 / 01:42:50 / cg" ! specificationFor:aKey