paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-11 20:39:15 +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; end;
finally finally
AllPath:=fUnitSearchPaths.DelimitedText; AllPath:=fUnitSearchPaths.DelimitedText;
// set unit paths to find all project units // set unit and include paths for project
LazProject.CompilerOptions.OtherUnitFiles:= with LazProject.CompilerOptions do begin
MergeSearchPaths(LazProject.CompilerOptions.OtherUnitFiles,AllPath); OtherUnitFiles:=MergeSearchPaths(OtherUnitFiles,AllPath);
// set include path IncludePath:=MergeSearchPaths(IncludePath,AllPath);
LazProject.CompilerOptions.IncludePath:= end;
MergeSearchPaths(LazProject.CompilerOptions.IncludePath,AllPath);
// clear caches // clear caches
LazProject.DefineTemplates.SourceDirectoriesChanged; LazProject.DefineTemplates.SourceDirectoriesChanged;
end; end;