--- a/hedgewars/uScript.pas Tue Aug 07 13:21:15 2012 -0400
+++ b/hedgewars/uScript.pas Wed Aug 08 10:26:10 2012 -0400
@@ -412,7 +412,7 @@
begin
gear:= GearByUID(lua_tointeger(L, 1));
if gear <> nil then
- DeleteGear(gear);
+ gear^.Message:= gear^.Message or gmDelete;
end;
lc_deletegear:= 0
end;