--- 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