ProjectBuilder.st
changeset 2852 a3007ba3b216
parent 2845 0d52c66fbc8e
child 2861 b8c6e02e60a1
--- a/ProjectBuilder.st	Sat Aug 06 15:48:10 2011 +0200
+++ b/ProjectBuilder.st	Tue Aug 16 18:20:52 2011 +0200
@@ -444,7 +444,7 @@
     bindings at:'ClassName' put:aClass name. 
     aClass superclass isNil ifTrue:[
         bindings at:'SuperclassName' put:'-'. 
-        bindings at:'SuperclassFileInclude' put:nil.
+        bindings at:'SuperclassFileInclude' put:''.
     ] ifFalse:[
         bindings at:'SuperclassName' put:aClass superclass name. 
         bindings at:'SuperclassFileName' put:(superclassFilename := Smalltalk fileNameForClass:aClass superclass).
@@ -482,6 +482,8 @@
     or:[ (oldContents := file contents) ~= newContents ]) ifTrue:[
         file contents: newContents.
     ].
+
+    "Modified: / 15-08-2011 / 14:58:46 / cg"
 !
 
 generateSourceFiles
@@ -635,7 +637,7 @@
     usedCompiler = 'vc' ifTrue:[ makeCommand := 'vcmake'. compilerFlag := '-DUSEVC' ].
     usedCompiler = 'lcc' ifTrue:[ makeCommand := 'lcmake'. compilerFlag := '-DUSELCC' ].
     usedCompiler = 'gcc' ifTrue:[ makeCommand := 'make'. ].
-    makeCommand := makeCommand, ' TOP=', mySTXTopDirectory pathName.
+    "/ makeCommand := makeCommand, ' TOP=', mySTXTopDirectory pathName.
 
     OperatingSystem isUNIXlike ifTrue:[
         OperatingSystem
@@ -675,7 +677,7 @@
         ]
     ]
 
-    "Modified: / 26-07-2010 / 12:25:33 / cg"
+    "Modified: / 15-08-2011 / 14:49:21 / cg"
 !
 
 recursiveCopyDirectoryForBuild:subdir