--- a/ParserFlags.st	Tue Apr 09 13:54:55 2013 +0200
+++ b/ParserFlags.st	Tue Apr 09 14:00:38 2013 +0200
@@ -1503,7 +1503,8 @@
     DefineForMINGW32 := '__MINGW32__'.
     DefineForMINGW64 := '__MINGW64__'.
 
-    self initializeSTCFlagsForTopDirectory:(OperatingSystem pathOfSTXExecutable , '/../..').
+    self initializeSTCFlagsForTopDirectory:
+        OperatingSystem pathOfSTXExecutable asFilename directory directory directory.
 
     "
      ParserFlags initialize
@@ -1531,7 +1532,7 @@
 
     "/ if in the development directory, use ./modules
     Smalltalk isSmalltalkDevelopmentSystem ifTrue:[
-        STCModulePath := './modules'.
+        STCModulePath := 'modules'.
     ] ifFalse:[
         STCModulePath := Filename tempDirectory constructString:'modules'.
     ].
@@ -2530,11 +2531,11 @@
 !ParserFlags class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.103 2013-04-09 11:54:55 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.104 2013-04-09 12:00:38 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.103 2013-04-09 11:54:55 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.104 2013-04-09 12:00:38 stefan Exp $'
 ! !