hedgewars/uCommandHandlers.pas
changeset 7468 1333ca7554dc
parent 7426 55b49cc1f33a
child 7503 deaeac102355
--- a/hedgewars/uCommandHandlers.pas	Tue Jul 31 23:29:00 2012 +0400
+++ b/hedgewars/uCommandHandlers.pas	Wed Aug 01 18:35:09 2012 -0400
@@ -614,13 +614,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