2015-03-22 16:59 GMT-03:00 luiz americo pereira camara <[email protected]>:
> > > 2015-03-22 16:32 GMT-03:00 Mattias Gaertner <[email protected]>: > >> On Sun, 22 Mar 2015 10:15:23 -0300 >> > http://imagebin.ca/v/1vhYYNAJuxPx : Here two files have UnitName added >> in >> > lpi >> > >> > http://imagebin.ca/v/1vhYLsrfpWDd : One commit later, the same files >> have >> > UnitName removed >> > >> > Is this a bug ? >> >> Probably. Do you know how to reproduce it? >> > > Found something that may be related: Take the following entry: <Unit1> <Filename Value="views\mainview.pas"/> <IsPartOfProject Value="True"/> <ComponentName Value="MainViewForm"/> <HasResources Value="True"/> <ResourceBaseClass Value="Form"/> </Unit1> In TUnitInfo.LoadFromXMLConfig: A Filename is set to FileName ('views\mainview.pas') AFilename:=XMLConfig.GetValue(Path+'Filename/Value',''); Later AFileName is set again this time to ResourceFileName, that is empty AFilename:=XMLConfig.GetValue(Path+'ResourceFilename/Value',''); Later AFilename is checked before setting fUnitName: if FilenameIsPascalSource(AFilename) then fUnitName:=XMLConfig.GetValue(Path+'UnitName/Value',ExtractFileNameOnly(AFilename)); Since AFileName is empty, fUnitName will not be set In the other side, in the following file <Unit2> <Filename Value="models\patientclasses.pas"/> <IsPartOfProject Value="True"/> <UnitName Value="PatientClasses"/> </Unit2> fUnitName is set to empty at LoadFromXMLConfig, but at the time of saving fUnitName gets its correct value 'PatientClasses'. Could not detect where gets the correct value. Breakpoints at ImproveUnitNameCache, SetUnitName, ReadUnitSource and LoadFromXMLConfig Luiz
-- _______________________________________________ Lazarus mailing list [email protected] http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
