--- a/Tools__ProjectBuilderAssistantApplication.st Tue Nov 29 11:28:51 2011 +0100
+++ b/Tools__ProjectBuilderAssistantApplication.st Sun Dec 04 19:56:26 2011 +0100
@@ -2555,13 +2555,13 @@
|query matching projectType idx|
projectType := self projectType.
- projectType == ProjectDefinition libraryType ifTrue:[
+ projectType = ProjectDefinition libraryType ifTrue:[
query := #isLibraryDefinition
] ifFalse:[
- projectType == ProjectDefinition guiApplicationType ifTrue:[
+ projectType = ProjectDefinition guiApplicationType ifTrue:[
query := #isGUIApplication
] ifFalse:[
- projectType == ProjectDefinition nonGuiApplicationType ifTrue:[
+ projectType = ProjectDefinition nonGuiApplicationType ifTrue:[
query := #isConsoleApplication
] ifFalse:[
self error.
@@ -2576,6 +2576,7 @@
|match|
match := false.
+
defClass isAbstract ifFalse:[
(self hideSTXProjects value not
or:[ defClass package asPackageId module ~= 'stx' ])
@@ -2583,7 +2584,8 @@
match := defClass perform:query
].
].
- ].
+ match
+ ].
matching sort:[:a :b | a name < b name].
self listOfMatchingProjects value:matching.
@@ -2595,6 +2597,8 @@
] ifFalse:[
self selectedProjectIndexHolder value:idx.
].
+
+ "Modified: / 04-12-2011 / 19:55:37 / cg"
!
updateListOfNewProjectsName