equal
deleted
inserted
replaced
612 |
612 |
613 startApplication:anApplication |
613 startApplication:anApplication |
614 | window| |
614 | window| |
615 |
615 |
616 "/ anApplication masterApplication:self. |
616 "/ anApplication masterApplication:self. |
617 anApplication window ifNil:[ |
617 anApplication window isNil ifTrue:[ |
618 window := ApplicationSubView new. |
618 window := ApplicationSubView new. |
619 anApplication createBuilder. |
619 anApplication createBuilder. |
620 window client:anApplication. |
620 window client:anApplication. |
621 ]. |
621 ]. |
622 self listOfApplications add:anApplication. |
622 self listOfApplications add:anApplication. |
1018 tabMenuAt:aTab |
1018 tabMenuAt:aTab |
1019 |
1019 |
1020 |menu| |
1020 |menu| |
1021 |
1021 |
1022 menu := Menu new fromLiteralArrayEncoding:self class tabMenu. |
1022 menu := Menu new fromLiteralArrayEncoding:self class tabMenu. |
1023 menu ifNil:[ ^ nil ]. |
1023 menu isNil ifTrue:[ ^ nil ]. |
1024 tabMenuIndex := aTab. |
1024 tabMenuIndex := aTab. |
1025 "/ self currentTabMenusApplication fileName |
1025 "/ self currentTabMenusApplication fileName |
1026 menu receiver:self. |
1026 menu receiver:self. |
1027 ^ menu |
1027 ^ menu |
1028 ! ! |
1028 ! ! |
5611 ! ! |
5611 ! ! |
5612 |
5612 |
5613 !FileApplicationNoteBook class methodsFor:'documentation'! |
5613 !FileApplicationNoteBook class methodsFor:'documentation'! |
5614 |
5614 |
5615 version |
5615 version |
5616 ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.208 2006-11-24 11:02:33 cg Exp $' |
5616 ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.209 2007-01-12 17:40:51 cg Exp $' |
5617 ! ! |
5617 ! ! |