equal
deleted
inserted
replaced
184 hedgewarsMountPackages; |
184 hedgewarsMountPackages; |
185 |
185 |
186 // need access to teams and frontend configs (for bindings) |
186 // need access to teams and frontend configs (for bindings) |
187 pfsMountAtRoot(UserPathPrefix); |
187 pfsMountAtRoot(UserPathPrefix); |
188 |
188 |
|
189 {$IFNDEF PAS2C} |
189 if cTestLua then |
190 if cTestLua then |
190 begin |
191 begin |
191 pfsMountAtRoot(ExtractFileDir(cScriptName)); |
192 pfsMountAtRoot(ExtractFileDir(cScriptName)); |
192 cScriptName := ExtractFileName(cScriptName); |
193 cScriptName := ExtractFileName(cScriptName); |
193 end; |
194 end; |
|
195 {$ENDIF} |
194 end; |
196 end; |
195 |
197 |
196 procedure freeModule; |
198 procedure freeModule; |
197 begin |
199 begin |
198 PHYSFS_deinit; |
200 PHYSFS_deinit; |