--- a/hedgewars/uConsts.pas	Thu Jun 30 15:09:10 2011 +0400
+++ b/hedgewars/uConsts.pas	Fri Jul 01 10:38:00 2011 +0400
@@ -261,7 +261,8 @@
     posCaseHealth  = $00000002;
     posCaseUtility = $00000004;
     posCaseDummy   = $00000008;
-    posCaseTrap    = $00000010;
+    posCaseExplode = $00000010;
+    posCasePoison  = $00000020;
 
     NoPointX = Low(LongInt);
     cTargetPointRef : TPoint = (X: NoPointX; Y: 0);