hedgewars/uCommandHandlers.pas
changeset 6088 47d1b04003d1
parent 5679 505c6448069b
child 6131 4e8816cf9459
--- a/hedgewars/uCommandHandlers.pas	Wed Oct 05 22:57:42 2011 +0400
+++ b/hedgewars/uCommandHandlers.pas	Thu Oct 06 00:11:55 2011 +0400
@@ -451,11 +451,13 @@
 procedure chSetMap(var s: shortstring);
 begin
 if isDeveloperMode then
-begin
-UserPathz[ptMapCurrent]:= UserPathz[ptMaps] + '/' + s;
-Pathz[ptMapCurrent]:= Pathz[ptMaps] + '/' + s;
-InitStepsFlags:= InitStepsFlags or cifMap
-end
+    begin
+    UserPathz[ptMapCurrent]:= UserPathz[ptMaps] + '/' + s;
+    Pathz[ptMapCurrent]:= Pathz[ptMaps] + '/' + s;
+    InitStepsFlags:= InitStepsFlags or cifMap
+    end;
+
+ScriptLoad(s)
 end;
 
 procedure chSetTheme(var s: shortstring);