Ignore:
Timestamp:
May 22, 2017, 6:37:31 PM (7 years ago)
Author:
chronos
Message:
  • Fixed: Tribe special unit names were not loaded correctly.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/LocalPlayer/Tribes.pas

    r88 r98  
    55
    66uses
    7   Protocol, ScreenTools,
    8 
     7  Protocol, ScreenTools, LazFileUtils,
    98  Classes, Graphics, SysUtils;
    109
     
    2019  TModelPictureInfo = record
    2120    trix, mix, pix, Hash: integer;
    22     GrName: ShortString end;
    23 
    24     TTribe = class symHGr, sympix, faceHGr, facepix, cHGr, cpix,
     21    GrName: ShortString;
     22  end;
     23
     24  TTribe = class
     25    symHGr, sympix, faceHGr, facepix, cHGr, cpix,
    2526    // symbol and city graphics
    2627    cAge, mixSlaves: integer;
     
    498499          begin
    499500            Input := Script[i];
    500             if Input = '#UNITS ' + GrName then
     501            if Input = '#UNITS ' + ExtractFileNameOnly(GrName) then
    501502              ok := true
    502503            else if (Input <> '') and (Input[1] = '#') then
Note: See TracChangeset for help on using the changeset viewer.