--- a/hedgewars/uPhysFSLayer.pas	Sat Nov 22 00:55:01 2014 +0300
+++ b/hedgewars/uPhysFSLayer.pas	Wed Dec 03 00:07:33 2014 +0300
@@ -186,13 +186,11 @@
 
     hedgewarsMountPackages;
 
-    {$IFNDEF PAS2C}
     if cTestLua then
         begin
-            pfsMountAtRoot(ExtractFileDir(cScriptName));
+            pfsMountAtRoot(ansistring(ExtractFileDir(cScriptName)));
             cScriptName := ExtractFileName(cScriptName);
         end;
-    {$ENDIF}
 end;
 
 procedure freeModule;