equal
deleted
inserted
replaced
281 "answer the name of the application. |
281 "answer the name of the application. |
282 This is also the name of the generated .exe file. |
282 This is also the name of the generated .exe file. |
283 |
283 |
284 Subclasses may redefine this" |
284 Subclasses may redefine this" |
285 |
285 |
|
286 ^ self applicationNameFromPackage |
|
287 |
|
288 " |
|
289 bosch_dapasx_application applicationName |
|
290 stx_projects_smalltalk applicationName |
|
291 " |
|
292 |
|
293 "Created: / 08-08-2006 / 20:25:39 / fm" |
|
294 "Modified: / 30-08-2006 / 19:29:25 / cg" |
|
295 ! |
|
296 |
|
297 applicationNameConsole |
|
298 ^ self applicationName,'_debug' |
|
299 ! |
|
300 |
|
301 applicationNameFromPackage |
|
302 "answer the name of the application. |
|
303 This is also the name of the generated .exe file. |
|
304 |
|
305 Subclasses may redefine this" |
|
306 |
286 |m path| |
307 |m path| |
287 |
308 |
288 m := self moduleDirectory. |
309 m := self moduleDirectory. |
289 path := m subStrings:$/. |
310 path := m subStrings:$/. |
290 path last = 'application' ifTrue:[ |
311 path last = 'application' ifTrue:[ |
299 stx_projects_smalltalk applicationName |
320 stx_projects_smalltalk applicationName |
300 " |
321 " |
301 |
322 |
302 "Created: / 08-08-2006 / 20:25:39 / fm" |
323 "Created: / 08-08-2006 / 20:25:39 / fm" |
303 "Modified: / 30-08-2006 / 19:29:25 / cg" |
324 "Modified: / 30-08-2006 / 19:29:25 / cg" |
304 ! |
|
305 |
|
306 applicationNameConsole |
|
307 ^ self applicationName,'_debug' |
|
308 ! |
325 ! |
309 |
326 |
310 applicationNameNoConsole |
327 applicationNameNoConsole |
311 ^ self applicationName |
328 ^ self applicationName |
312 ! |
329 ! |
1717 ! ! |
1734 ! ! |
1718 |
1735 |
1719 !ApplicationDefinition class methodsFor:'documentation'! |
1736 !ApplicationDefinition class methodsFor:'documentation'! |
1720 |
1737 |
1721 version |
1738 version |
1722 ^ '$Header: /cvs/stx/stx/libbasic/ApplicationDefinition.st,v 1.68 2007-02-28 19:36:27 cg Exp $' |
1739 ^ '$Header: /cvs/stx/stx/libbasic/ApplicationDefinition.st,v 1.69 2007-02-28 19:51:20 cg Exp $' |
1723 ! ! |
1740 ! ! |