--- a/ByteCodeCompiler.st	Thu Apr 01 15:19:59 2004 +0200
+++ b/ByteCodeCompiler.st	Wed Apr 07 21:22:53 2004 +0200
@@ -915,19 +915,19 @@
 
     |libDir incDir|
 
-    STCCompilationIncludes := aString.
+    STCCompilationIncludes := aString ? ''.
 
     "/ if STX_LIBDIR is defined, and not in passed argument,
     "/ add it here.
 
     libDir := OperatingSystem getEnvironment:'STX_LIBDIR'.
     (libDir notNil and:[libDir asFilename exists]) ifTrue:[
-	incDir := libDir asFilename construct:'include'.
-	incDir exists ifTrue:[
-	    (STCCompilationIncludes asCollectionOfWords includes:('-I' , incDir pathName)) ifFalse:[
-		STCCompilationIncludes := aString , ' ' , ('-I' , incDir pathName).
-	    ]
-	]
+        incDir := libDir asFilename construct:'include'.
+        incDir exists ifTrue:[
+            (STCCompilationIncludes asCollectionOfWords includes:('-I' , incDir pathName)) ifFalse:[
+                STCCompilationIncludes := STCCompilationIncludes , ' ' , ('-I' , incDir pathName).
+            ]
+        ]
     ]
 
     "
@@ -3835,7 +3835,7 @@
 !ByteCodeCompiler class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/ByteCodeCompiler.st,v 1.222 2004-03-30 19:48:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ByteCodeCompiler.st,v 1.223 2004-04-07 19:22:53 werner Exp $'
 ! !
 
 ByteCodeCompiler initialize!