paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-03 23:40:22 +02:00
Code Issues Packages Projects Releases Wiki Activity

Converter: Code formatting and cleaning

Browse Source 
git-svn-id: trunk@30129 -
This commit is contained in:
juha 2011-04-02 11:13:41 +00:00
parent 3b73383835
commit da1729de31
1 changed files with 5 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
converter/convertdelphi.pas
View File

@ -1336,12 +1336,11 @@ begin
end;
finally
AllPath:=fUnitSearchPaths.DelimitedText;
// set unit paths to find all project units
LazProject.CompilerOptions.OtherUnitFiles:=
MergeSearchPaths(LazProject.CompilerOptions.OtherUnitFiles,AllPath);
// set include path
LazProject.CompilerOptions.IncludePath:=
MergeSearchPaths(LazProject.CompilerOptions.IncludePath,AllPath);
// set unit and include paths for project
with LazProject.CompilerOptions do begin
OtherUnitFiles:=MergeSearchPaths(OtherUnitFiles,AllPath);
IncludePath:=MergeSearchPaths(IncludePath,AllPath);
end;
// clear caches
LazProject.DefineTemplates.SourceDirectoriesChanged;
end;