*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Thu, 22 Oct 2009 19:34:44 +0200
changeset 12331 02c0437d7817
parent 12330 f9b57b0b8a8b
child 12332 8967d7e3d44c
*** empty log message ***
ProjectDefinition.st
--- a/ProjectDefinition.st	Thu Oct 22 19:31:16 2009 +0200
+++ b/ProjectDefinition.st	Thu Oct 22 19:34:44 2009 +0200
@@ -1341,9 +1341,29 @@
     ^ NonGUIApplicationType
 !
 
+projectTypeSelectors
+    "a list of possible project type selectors"
+
+    ^ #( libraryType guiApplicationType nonGuiApplicationType )
+
+    "
+     self libraryType
+     self guiApplicationType
+     self nonGuiApplicationType
+    "
+
+    "Created: / 23-08-2006 / 14:27:32 / cg"
+!
+
 projectTypes
+    "a list of possible project types"
+
     ^ self libraryTypes , self applicationTypes
 
+    "
+     self projectTypes
+    "
+
     "Created: / 23-08-2006 / 14:27:32 / cg"
 ! !
 
@@ -4625,6 +4645,10 @@
     ^ self hasAllCompiledClassesFullyLoaded and:[self hasAllClassesLoaded and:[self hasAllExtensionsLoaded]]
 
     "Created: / 24-10-2006 / 23:52:23 / cg"
+!
+
+projectType
+    ^ self subclassResponsibility
 ! !
 
 !ProjectDefinition class methodsFor:'queries-privacy'!
@@ -4717,11 +4741,11 @@
 !ProjectDefinition class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.263 2009-10-20 21:53:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.264 2009-10-22 17:34:44 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.263 2009-10-20 21:53:16 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ProjectDefinition.st,v 1.264 2009-10-22 17:34:44 cg Exp $'
 ! !
 
 ProjectDefinition initialize!