--- a/hedgewars/uConsts.pas	Fri Mar 07 17:43:05 2008 +0000
+++ b/hedgewars/uConsts.pas	Fri Mar 07 18:10:03 2008 +0000
@@ -43,7 +43,7 @@
                    sprQuestion, sprPowerBar, sprWindBar,
                    sprWindL, sprWindR);
 
-     TGearType  = (gtCloud, gtAmmo_Bomb, gtHedgehog, gtAmmo_Grenade, gtHealthTag,
+     TGearType  = (gtAmmo_Bomb, gtHedgehog, gtAmmo_Grenade, gtHealthTag,
                    gtGrave, gtUFO, gtShotgunShot, gtPickHammer, gtRope,
                    gtSmokeTrace, gtExplosion, gtMine, gtCase, gtDEagleShot, gtDynamite,
                    gtTeamHealthSorter, gtClusterBomb, gtCluster, gtShover, gtFlame,
@@ -51,7 +51,7 @@
                    gtParachute, gtAirAttack, gtAirBomb, gtBlowTorch, gtGirder,
                    gtTeleport, gtSmallDamage, gtSwitcher, gtTarget);
 
-     TVisualGearType = (vgtFlake);
+     TVisualGearType = (vgtFlake, vgtCloud);
 
      TGearsType = set of TGearType;