--- a/RegressionTests__MakefileTests.st	Wed Nov 30 13:56:33 2016 +0000
+++ b/RegressionTests__MakefileTests.st	Thu Dec 08 10:28:07 2016 +0000
@@ -138,57 +138,59 @@
 
     "/ Compile all classes...
     Class packageQuerySignal answer:package do:[
-	(self class privateClasses select:[:cls | cls packageIdent = packageIdent ]) do:[:cls |
-		| copy |
+        (self class privateClasses select:[:cls | cls packageIdent = packageIdent ]) do:[:cls |
+                | copy |
 
-		copy := cls superclass
-			subclass: cls nameWithoutPrefix
-			instanceVariableNames:(cls instVarNames asStringWith:' ')
-			classVariableNames:(cls classVarNames asStringWith:' ')
-			poolDictionaries:cls poolDictionaries
-			category:'** tmp **'.
-		cls methodDictionary do:[:each |
-		    copy compile:each source classified:each category.
-		].
-		cls class methodDictionary do:[:each |
-		    copy class compile:each source classified:each category.
-		].
-		(copy inheritsFrom:StandaloneStartup) ifTrue:[
-		    startup := copy.
-		].
-	    ].
-	].
+                copy := cls superclass
+                        subclass: cls nameWithoutPrefix
+                        instanceVariableNames:(cls instVarNames asStringWith:' ')
+                        classVariableNames:(cls classVarNames asStringWith:' ')
+                        poolDictionaries:cls poolDictionaries
+                        category:'** tmp **'.
+                cls methodDictionary do:[:each |
+                    copy compile:each source classified:each category.
+                ].
+                cls class methodDictionary do:[:each |
+                    copy class compile:each source classified:each category.
+                ].
+                (copy inheritsFrom:StandaloneStartup) ifTrue:[
+                    startup := copy.
+                ].
+            ].
+        ].
 
     "/ Create project definition class.
     Class packageQuerySignal answer:package do:[
-	packageDef := ProjectDefinition
-		definitionClassForPackage:package
-		projectType:packageType
-		createIfAbsent:true.
-	packageDef theNonMetaclass
-	    forEachContentsMethodsCodeToCompileDo:[:code :category | packageDef theMetaclass compile:code classified:category ]
-	    "/ignoreOldEntries: false
-	    ignoreOldDefinition: false.
-	packageDef isApplicationDefinition ifTrue:[
-	    packageDef class compile:'startupClassName ^ ' , startup fullName storeString.
-	].
+        packageDef := ProjectDefinition
+                definitionClassForPackage:package
+                projectType:packageType
+                createIfAbsent:true.
+
+        packageDef class compile:'applicationIconFileName ^ nil'.
+        packageDef theNonMetaclass
+            forEachContentsMethodsCodeToCompileDo:[:code :category | packageDef theMetaclass compile:code classified:category ]
+            "/ignoreOldEntries: false
+            ignoreOldDefinition: false.
+        packageDef isApplicationDefinition ifTrue:[
+            packageDef class compile:'startupClassName ^ ' , startup fullName storeString.
+        ].
     ].
     "/ Fileout to package directory...
 
     packageDef classes do:[:class |
-	| container |
+        | container |
 
-	container := (class fullName copyReplaceAll:$: with:$_) , '.st'.
-	(packageDir / container)
-	    writingFileDo:[:f |
-		AbstractSourceCodeManager
-		    fileOutSourceCodeOf:class
-		    on:f
-		    withTimeStamp:false
-		    withInitialize:true
-		    withDefinition:true
-		    methodFilter:[:mth | mth package = package ]
-	    ]
+        container := (class fullName copyReplaceAll:$: with:$_) , '.st'.
+        (packageDir / container)
+            writingFileDo:[:f |
+                AbstractSourceCodeManager
+                    fileOutSourceCodeOf:class
+                    on:f
+                    withTimeStamp:false
+                    withInitialize:true
+                    withDefinition:true
+                    methodFilter:[:mth | mth package = package ]
+            ]
     ].
 
     "/ Generate build support files...