pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

iphonelazext: changed update Xcode project. Only create info.plist, if file doesn't exist, reuse, if existing info.plist

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@4417 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
skalogryz
2016-01-07 05:22:03 +00:00
parent 8ee073cc40
commit add0db0bee
5 changed files with 253 additions and 44 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
components/iphonelazext/xcodeutils.pas
View File

@ -51,9 +51,9 @@ begin
try
plistfile.LoadFromFile(FileName, plist);
Descr.Name:=plist.GetStrValue('CanonicalName');
Descr.Alternate:=plist.GetStrValue('AlternateSDK');
Descr.Version:=plist.GetStrValue('Version');
Descr.Name:=GetStr(plist, 'CanonicalName');
Descr.Alternate:=GetStr(plist, 'AlternateSDK');
Descr.Version:=GetStr(plist, 'Version');
finally
plist.Free;
end;
@ -168,8 +168,8 @@ begin
if AnsiLowerCase(ExtractFileExt(files[j]))='.plist' then begin
plist:=TPListFile.Create;
plistfile.LoadFromFile(files[j],plist);
xib:=plist.GetStrValue('MainTemplateFile');
descr:=plist.GetStrValue('Description');
xib:=GetStr(plist, 'MainTemplateFile');
descr:=GetStr(plist, 'Description');
name:=ChangeFileExt(xib, '');
Break;
end;