hedgewars/uCommandHandlers.pas
branchhedgeroid
changeset 5725 e27100a0e2d0
parent 5577 272c82f82cee
parent 5679 505c6448069b
child 6224 42b256eca362
equal deleted inserted replaced
5671:ba4c3a4c8b09 5725:e27100a0e2d0
   448 flagMakeCapture:= true
   448 flagMakeCapture:= true
   449 end;
   449 end;
   450 
   450 
   451 procedure chSetMap(var s: shortstring);
   451 procedure chSetMap(var s: shortstring);
   452 begin
   452 begin
   453 if isDeveloperMode and (s <> '') then
   453 if isDeveloperMode then
   454 begin
   454 begin
   455 UserPathz[ptMapCurrent]:= UserPathz[ptMaps] + '/' + s;
   455 UserPathz[ptMapCurrent]:= UserPathz[ptMaps] + '/' + s;
   456 Pathz[ptMapCurrent]:= Pathz[ptMaps] + '/' + s;
   456 Pathz[ptMapCurrent]:= Pathz[ptMaps] + '/' + s;
   457 InitStepsFlags:= InitStepsFlags or cifMap
   457 InitStepsFlags:= InitStepsFlags or cifMap
   458 end
   458 end