hedgewars/uGears.pas
changeset 3894 9abce5468583
parent 3848 32ceb775906b
child 3908 1429c303858d
--- a/hedgewars/uGears.pas	Wed Sep 22 21:47:28 2010 +0200
+++ b/hedgewars/uGears.pas	Wed Sep 22 21:53:29 2010 +0200
@@ -566,8 +566,8 @@
 else if Gear^.Kind = gtHedgehog then
     if (CurAmmoGear <> nil) and (CurrentHedgehog^.Gear = Gear) then
         begin
-        Gear^.Message:= gm_Destroy;
-        CurAmmoGear^.Message:= gm_Destroy;
+        Gear^.Message:= gmDestroy;
+        CurAmmoGear^.Message:= gmDestroy;
         exit
         end
     else