# HG changeset patch
# User unc0rr
# Date 1239112926 0
# Node ID 1e0e1f03180d8a1ee216537e5084e7b341da4a5d
# Parent  9b8bdee5db6cbf8cf231a4013d9289ce953dc646
Fix epic bug randomly teleporting hedgehogs

diff -r 9b8bdee5db6c -r 1e0e1f03180d hedgewars/uGears.pas
--- a/hedgewars/uGears.pas	Tue Apr 07 14:01:46 2009 +0000
+++ b/hedgewars/uGears.pas	Tue Apr 07 14:02:06 2009 +0000
@@ -1634,6 +1634,8 @@
    (CountGears(gtCase) >= 5) or
    (getrandom(cCaseFactor) <> 0) then exit;
 
+FollowGear:= nil;
+
 case getrandom(20) of
      0..6: begin
         FollowGear:= AddGear(0, 0, gtCase, 0, _0, _0, 0);