equal
deleted
inserted
replaced
177 hedgewarsMountPackages; |
177 hedgewarsMountPackages; |
178 |
178 |
179 // need access to teams and frontend configs (for bindings) |
179 // need access to teams and frontend configs (for bindings) |
180 pfsMountAtRoot(UserPathPrefix); |
180 pfsMountAtRoot(UserPathPrefix); |
181 |
181 |
182 {$IFNDEF PAS2C} |
|
183 if cTestLua then |
182 if cTestLua then |
184 begin |
183 begin |
185 pfsMountAtRoot(ExtractFileDir(cScriptName)); |
184 pfsMountAtRoot(ansistring(ExtractFileDir(cScriptName))); |
186 cScriptName := ExtractFileName(cScriptName); |
185 cScriptName := ExtractFileName(cScriptName); |
187 end; |
186 end; |
188 {$ENDIF} |
|
189 end; |
187 end; |
190 |
188 |
191 procedure freeModule; |
189 procedure freeModule; |
192 begin |
190 begin |
193 PHYSFS_deinit; |
191 PHYSFS_deinit; |