184     pfsMountAtRoot(userPrefix + ansistring('/Data'));

   184     pfsMountAtRoot(userPrefix + ansistring('/Data'));

   185     pfsMount(userPrefix, PChar('/Config'));

   185     pfsMount(userPrefix, PChar('/Config'));

   186 

   186 

   187     hedgewarsMountPackages;

   187     hedgewarsMountPackages;

   188 

   188 

   190     if cTestLua then

   189     if cTestLua then

   191         begin

   190         begin

   193             cScriptName := ExtractFileName(cScriptName);

   192             cScriptName := ExtractFileName(cScriptName);

   194         end;

   193         end;

   196 end;

   194 end;

   197 

   195 

   198 procedure freeModule;

   196 procedure freeModule;

   199 begin

   197 begin

   200     PHYSFS_deinit;

   198     PHYSFS_deinit;