hedgewars/uAmmos.pas
changeset 1850 a0332e79fdc9
parent 1849 2a989e5abda6
child 1865 ebc6dfca60d4
--- a/hedgewars/uAmmos.pas	Sun Mar 01 17:24:25 2009 +0000
+++ b/hedgewars/uAmmos.pas	Sun Mar 01 17:30:10 2009 +0000
@@ -225,7 +225,7 @@
 
 procedure SetWeapon(weap: TAmmoType);
 begin
-ParseCommand('/setweap ' + char(LongInt(weap)+33), true)
+ParseCommand('/setweap ' + char(weap), true)
 end;
 
 procedure DisableSomeWeapons;