--- a/Tools__ProjectBuilderAssistantApplication.st	Wed Mar 15 12:20:03 2017 +0100
+++ b/Tools__ProjectBuilderAssistantApplication.st	Sat Mar 18 19:05:37 2017 +0100
@@ -3740,7 +3740,7 @@
         startupClasses := startupClasses asOrderedCollection.
         startupClasses sort:[:a :b | a name < b name].
 
-        startUpClassName := [ selectedProjectDefinition startupClassName ] ifError:[ nil ].
+        startUpClassName := [ selectedProjectDefinition startupClassName ] on:Error do:nil.
         startUpClassName notNil ifTrue:[
             startUpClass := Smalltalk classNamed:startUpClassName.
             startUpClass notNil ifTrue:[
@@ -3752,6 +3752,8 @@
 
     self listOfStartupClassesInProject value:startupClasses.
     self selectedStartupClassIndexHolder value:startupClassIndex.
+
+    "Modified: / 18-03-2017 / 18:42:52 / stefan"
 !
 
 updateProjectAttributes