hedgewars/uCommandHandlers.pas
changeset 13642 3d14950641a4
parent 13641 007813b81f1b
child 13721 61095cb5f58a
equal deleted inserted replaced
13641:007813b81f1b 13642:3d14950641a4
   608     exit;
   608     exit;
   609 
   609 
   610 if autoCameraOn then
   610 if autoCameraOn then
   611     begin
   611     begin
   612     FollowGear:= nil;
   612     FollowGear:= nil;
   613     AddCaption(trmsg[sidAutoCameraOff], cLightGrayColor, capgrpVolume);
   613     AddCaption(trmsg[sidAutoCameraOff], capcolSetting, capgrpVolume);
   614     autoCameraOn:= false
   614     autoCameraOn:= false
   615     end
   615     end
   616 else
   616 else
   617     begin
   617     begin
   618     AddCaption(trmsg[sidAutoCameraOn], cLightGrayColor, capgrpVolume);
   618     AddCaption(trmsg[sidAutoCameraOn], capcolSetting, capgrpVolume);
   619     bShowFinger:= true;
   619     bShowFinger:= true;
   620     if not CurrentHedgehog^.Unplaced then
   620     if not CurrentHedgehog^.Unplaced then
   621         FollowGear:= CurrentHedgehog^.Gear;
   621         FollowGear:= CurrentHedgehog^.Gear;
   622     autoCameraOn:= true
   622     autoCameraOn:= true
   623     end
   623     end