diff -r eac49c3e168e -r eb998d836550 Tools__ProjectBuilderAssistantApplication.st --- 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