equal
deleted
inserted
replaced
66 |
66 |
67 !ProjectLoader class methodsFor:'initialization'! |
67 !ProjectLoader class methodsFor:'initialization'! |
68 |
68 |
69 initialize |
69 initialize |
70 |
70 |
71 | item | |
71 "/ | item | |
72 item := (MenuItem label:'Load project') |
72 "/ item := (MenuItem label:'Load project') |
73 nameKey:'LoadProject'; |
73 "/ nameKey:'LoadProject'; |
74 value:[(Smalltalk at: self fullName asSymbol) open]. |
74 "/ value:[(Smalltalk at: self fullName asSymbol) open]. |
75 |
75 "/ |
76 NewLauncher |
76 "/ NewLauncher |
77 addMenuItem: item |
77 "/ addMenuItem: item |
78 from: nil |
78 "/ from: nil |
79 in: 'menu' |
79 "/ in: 'menu' |
80 position: #after |
80 "/ position: #after |
81 space: true. |
81 "/ space: true. |
82 |
82 |
83 " |
83 " |
84 self initialize |
84 self initialize |
85 " |
85 " |
86 |
86 |
87 "Created: / 22-11-2008 / 09:58:03 / Jan Vrany <vranyj1@fel.cvut.cz>" |
87 "Created: / 22-11-2008 / 09:58:03 / Jan Vrany <vranyj1@fel.cvut.cz>" |
88 "Modified: / 26-11-2008 / 10:00:39 / Jan Vrany <vranyj1@fel.cvut.cz>" |
88 "Modified: / 26-11-2008 / 10:00:39 / Jan Vrany <vranyj1@fel.cvut.cz>" |
|
89 "Modified: / 05-05-2012 / 19:07:39 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
89 ! ! |
90 ! ! |
90 |
91 |
91 !ProjectLoader class methodsFor:'accessing'! |
92 !ProjectLoader class methodsFor:'accessing'! |
92 |
93 |
93 projectSites |
94 projectSites |
420 version_CVS |
421 version_CVS |
421 ^ '§Header: /cvs/stx/stx/libtool/Tools__ProjectLoader.st,v 1.2 2011/07/03 19:41:59 cg Exp §' |
422 ^ '§Header: /cvs/stx/stx/libtool/Tools__ProjectLoader.st,v 1.2 2011/07/03 19:41:59 cg Exp §' |
422 ! |
423 ! |
423 |
424 |
424 version_SVN |
425 version_SVN |
425 ^ '$Id: Tools__ProjectLoader.st 7854 2012-01-30 17:49:41Z vranyj1 $' |
426 ^ '$Id: Tools__ProjectLoader.st 7989 2012-05-05 21:28:49Z vranyj1 $' |
426 ! ! |
427 ! ! |
427 |
428 |
428 ProjectLoader initialize! |
429 ProjectLoader initialize! |