--- a/hedgewars/uCommandHandlers.pas Wed Nov 14 00:23:29 2012 +0100
+++ b/hedgewars/uCommandHandlers.pas Thu Nov 22 00:41:53 2012 +0100
@@ -549,15 +549,9 @@
if isDeveloperMode then
begin
if s = '' then
- begin
- UserPathz[ptMapCurrent]:= s;
- Pathz[ptMapCurrent]:= s;
- end
+ cPathz[ptMapCurrent]:= s
else
- begin
- UserPathz[ptMapCurrent]:= UserPathz[ptMaps] + '/' + s;
- Pathz[ptMapCurrent]:= Pathz[ptMaps] + '/' + s;
- end;
+ cPathz[ptMapCurrent]:= cPathz[ptMaps] + '/' + s;
InitStepsFlags:= InitStepsFlags or cifMap
end;
cMapName:= s;
@@ -568,8 +562,7 @@
begin
if isDeveloperMode then
begin
- UserPathz[ptCurrTheme]:= UserPathz[ptThemes] + '/' + s;
- Pathz[ptCurrTheme]:= Pathz[ptThemes] + '/' + s;
+ cPathz[ptCurrTheme]:= cPathz[ptThemes] + '/' + s;
Theme:= s;
InitStepsFlags:= InitStepsFlags or cifTheme
end