hedgewars/uTypes.pas
changeset 7016 8b34f46e10c1
parent 7010 10a0a31804f3
child 7034 e3639ce1d4f8
--- a/hedgewars/uTypes.pas	Thu May 03 13:25:40 2012 +0200
+++ b/hedgewars/uTypes.pas	Thu May 03 16:04:38 2012 +0100
@@ -326,7 +326,7 @@
     THHAmmo = array[0..cMaxSlotIndex, 0..cMaxSlotAmmoIndex] of TAmmo;
 
     THedgehog = record
-            Name: string[192];
+            Name: shortstring;
             Gear: PGear;
             GearHidden: PGear;
             SpeechGear: PVisualGear;
@@ -352,7 +352,7 @@
 
     TTeam = record
             Clan: PClan;
-            TeamName: string[192];
+            TeamName: shortstring;
             ExtDriven: boolean;
             Binds: TBinds;
             Hedgehogs: array[0..cMaxHHIndex] of THedgehog;