# HG changeset patch
# User nemo
# Date 1362592991 18000
# Node ID afb2b467f80150caac2d5ef56391e695852c7f5c
# Parent  c00f1df47cef1d88d9a127f55fbffff27e5709a6
skip frozen hogs in switch

diff -r c00f1df47cef -r afb2b467f801 hedgewars/uAI.pas
--- a/hedgewars/uAI.pas	Wed Mar 06 12:55:48 2013 -0500
+++ b/hedgewars/uAI.pas	Wed Mar 06 13:03:11 2013 -0500
@@ -414,7 +414,7 @@
             // find another hog in team
             repeat
                 itHedgehog:= Succ(itHedgehog) mod CurrentTeam^.HedgehogsNumber;
-            until (itHedgehog = currHedgehogIndex) or (CurrentTeam^.Hedgehogs[itHedgehog].Gear <> nil);
+            until (itHedgehog = currHedgehogIndex) or ((CurrentTeam^.Hedgehogs[itHedgehog].Gear <> nil) and (CurrentTeam^.Hedgehogs[itHedgehog].Effects[heFrozen]=0));
 
 
             inc(switchesNum);