168 'The final install directory for Win32 deliveries.' |
168 'The final install directory for Win32 deliveries.' |
169 |
169 |
170 #libType |
170 #libType |
171 'A classLibrary addOn (and support files if any)' |
171 'A classLibrary addOn (and support files if any)' |
172 |
172 |
|
173 loadProjectCode |
|
174 'Load projects classes from the project directory' |
|
175 |
173 #methodsFile |
176 #methodsFile |
174 'Patches & Extensions are stored in this file.' |
177 'Patches & Extensions are stored in this file.' |
175 |
178 |
176 #packageID |
179 #packageID |
177 'Package ID used to associate classes & methods to this project.' |
180 'Package ID used to associate classes & methods to this project.' |
2235 ) |
2241 ) |
2236 #(#MenuItem |
2242 #(#MenuItem |
2237 #label: 'Load From...' |
2243 #label: 'Load From...' |
2238 #translateLabel: true |
2244 #translateLabel: true |
2239 #value: #openProject |
2245 #value: #openProject |
|
2246 #activeHelpKey: #openProject |
2240 ) |
2247 ) |
2241 #(#MenuItem |
2248 #(#MenuItem |
2242 #label: 'Load Project Code' |
2249 #label: 'Load Project Code' |
2243 #translateLabel: true |
2250 #translateLabel: true |
2244 #value: #loadProjectCode |
2251 #value: #loadProjectCode |
2245 #enabled: #hasProjectSelectedAndProjectFilenameHolder |
2252 #enabled: #hasProjectSelectedAndProjectFilenameHolder |
|
2253 #activeHelpKey: #loadProjectCode |
2246 ) |
2254 ) |
2247 #(#MenuItem |
2255 #(#MenuItem |
2248 #label: '-' |
2256 #label: '-' |
2249 ) |
2257 ) |
2250 #(#MenuItem |
2258 #(#MenuItem |
2251 #label: 'Save Project File' |
2259 #label: 'Save Project File' |
2252 #translateLabel: true |
2260 #translateLabel: true |
2253 #value: #saveProjectFile |
2261 #value: #saveProjectFile |
2254 #enabled: #hasProjectSelectedAndProjectFilenameHolder |
2262 #enabled: #hasProjectSelectedAndProjectFilenameHolder |
|
2263 #activeHelpKey: #saveProjectFile |
2255 ) |
2264 ) |
2256 #(#MenuItem |
2265 #(#MenuItem |
2257 #label: 'Save Project Code' |
2266 #label: 'Save Project Code' |
2258 #translateLabel: true |
2267 #translateLabel: true |
2259 #value: #saveProjectCode |
2268 #value: #saveProjectCode |
3753 aParameter wasAutoloaded ifTrue:[ |
3762 aParameter wasAutoloaded ifTrue:[ |
3754 self listOfAllClassesInPrerequisites add:something name. |
3763 self listOfAllClassesInPrerequisites add:something name. |
3755 ^ self. |
3764 ^ self. |
3756 ]. |
3765 ]. |
3757 aParameter package = package ifTrue:[ |
3766 aParameter package = package ifTrue:[ |
3758 self halt. |
3767 "/ a new class was added to the package; |
|
3768 "/ must look if already there, and possibly update my |
|
3769 "/ tree and classList |
|
3770 (self currentProject includesClass:aParameter) ifFalse:[ |
|
3771 self halt. |
|
3772 ]. |
|
3773 ^ self. |
3759 ] |
3774 ] |
3760 ] |
3775 ] |
3761 ]. |
3776 ]. |
3762 |
3777 |
3763 something == #methodInClass ifTrue:[ |
3778 something == #methodInClass ifTrue:[ |