# HG changeset patch
# User unc0rr
# Date 1213812765 0
# Node ID 38bb05efd774baed39b2c2529ef8540550f33445
# Parent  b19e22c6ab8337403a3f80fd9925534547847687
Draw explosion on kamikaze

diff -r b19e22c6ab83 -r 38bb05efd774 hedgewars/uGears.pas
--- a/hedgewars/uGears.pas	Wed Jun 18 18:05:15 2008 +0000
+++ b/hedgewars/uGears.pas	Wed Jun 18 18:12:45 2008 +0000
@@ -923,7 +923,7 @@
 begin
 TargetPoint.X:= NoPointX;
 {$IFDEF DEBUGFILE}if Radius > 3 then AddFileLog('Explosion: at (' + inttostr(x) + ',' + inttostr(y) + ')');{$ENDIF}
-if Radius = 50 then AddGear(X, Y, gtExplosion, 0, _0, _0, 0);
+if (Radius = 50) or (Radius = 30) then AddGear(X, Y, gtExplosion, 0, _0, _0, 0);
 if (Mask and EXPLAutoSound) <> 0 then PlaySound(sndExplosion, false);
 if (Mask and EXPLAllDamageInRadius)=0 then dmgRadius:= Radius shl 1
                                       else dmgRadius:= Radius;