--- a/ParserFlags.st	Wed Oct 31 17:02:15 2012 +0100
+++ b/ParserFlags.st	Wed Oct 31 17:03:04 2012 +0100
@@ -1504,7 +1504,7 @@
     ].
 
     (topDir asFilename construct:'stc') exists ifFalse:[
-        'ParserFlags [warning]: stc not found in "../.."' infoPrintCR.
+        ('ParserFlags [warning]: stc not found in "',topDirArg,'"') infoPrintCR.
         'ParserFlags [warning]: stc-compiling (primitive code) will not work in the browser' infoPrintCR.
         STCCompilation := #never.
     ].
@@ -2475,11 +2475,11 @@
 !ParserFlags class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.93 2012-10-31 16:02:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.94 2012-10-31 16:03:04 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.93 2012-10-31 16:02:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ParserFlags.st,v 1.94 2012-10-31 16:03:04 cg Exp $'
 ! !
 
 ParserFlags initialize!