hedgewars/uGearsRender.pas
changeset 9249 7b8c82785145
parent 9080 9b42757d7e71
child 9283 76e68c136a11
--- a/hedgewars/uGearsRender.pas	Sun Jun 23 13:35:26 2013 -0400
+++ b/hedgewars/uGearsRender.pas	Sun Jun 23 17:11:29 2013 -0400
@@ -40,14 +40,6 @@
 implementation
 uses uRender, uUtils, uVariables, uAmmos, Math, uVisualGears;
 
-const
-    // hog tag mask
-    //htNone        = $00;
-    htTeamName    = $01;
-    htName        = $02;
-    htHealth      = $04;
-    htTransparent = $08;
-
 procedure DrawRopeLinesRQ(Gear: PGear);
 begin
 with RopePoints do