changeset 7503 | deaeac102355 |
parent 7442 | 9bb6abdb5675 |
parent 7468 | 1333ca7554dc |
child 7628 | bc7b1d228a2c |
--- a/hedgewars/uCommandHandlers.pas Thu Jul 26 21:58:25 2012 +0400 +++ b/hedgewars/uCommandHandlers.pas Mon Aug 06 00:40:26 2012 +0400 @@ -626,13 +626,14 @@ if CheckNoTeamOrHH or isPaused then exit; -if FollowGear <> nil then +if autoCameraOn then begin + FollowGear:= nil; AddCaption('Auto Camera Off', $CCCCCC, capgrpVolume); autoCameraOn:= false end - else - begin +else + begin AddCaption('Auto Camera On', $CCCCCC, capgrpVolume); bShowFinger:= true; if not CurrentHedgehog^.Unplaced then