# HG changeset patch
# User unc0rr
# Date 1232283758 0
# Node ID ea3eddd73f2c7e757ed3379c9d66cc6573fdb0ec
# Parent  bb1e305320a17fea49ee1612003f6967b5e7d43a
Play sad animation on rc plane crash

diff -r bb1e305320a1 -r ea3eddd73f2c hedgewars/GSHandlers.inc
--- a/hedgewars/GSHandlers.inc	Sun Jan 18 13:01:49 2009 +0000
+++ b/hedgewars/GSHandlers.inc	Sun Jan 18 13:02:38 2009 +0000
@@ -2036,10 +2036,16 @@
 		end;
 	DeleteGear(Gear);
 	AfterAttack;
+	TurnTimeLeft:= 14 * 125;
+	ParseCommand('/taunt '#1, true)
 	end;
 
 if CheckGearDrowning(Gear) then
-	AfterAttack
+	begin
+	AfterAttack;
+	TurnTimeLeft:= 14 * 125;
+	ParseCommand('/taunt '#1, true)
+	end
 end;
 
 procedure doStepRCPlane(Gear: PGear);