--- a/hedgewars/uPhysFSLayer.pas	Mon Jan 27 01:07:12 2014 +0400
+++ b/hedgewars/uPhysFSLayer.pas	Mon Jan 27 22:34:06 2014 +0400
@@ -186,11 +186,13 @@
     // need access to teams and frontend configs (for bindings)
     pfsMountAtRoot(UserPathPrefix);
 
+    {$IFNDEF PAS2C}
     if cTestLua then
         begin
             pfsMountAtRoot(ExtractFileDir(cScriptName));
             cScriptName := ExtractFileName(cScriptName);
         end;
+    {$ENDIF}
 end;
 
 procedure freeModule;