paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-12-07 19:37:37 +01:00
Code Issues Packages Projects Releases Wiki Activity

IDE: File / Open: do not always resolve symlinks

Browse Source 
git-svn-id: trunk@54068 -
This commit is contained in:
mattias 2017-02-02 11:18:53 +00:00
parent 99b5de9bd3
commit 0b272c3409
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ide/main.pp
View File

@ -2929,7 +2929,11 @@ begin
try try
InputHistories.ApplyFileDialogSettings(OpenDialog); InputHistories.ApplyFileDialogSettings(OpenDialog);
OpenDialog.Title:=lisOpenFile; OpenDialog.Title:=lisOpenFile;
OpenDialog.Options:=OpenDialog.Options+[ofAllowMultiSelect];
OpenDialog.Options:=OpenDialog.Options+[
ofAllowMultiSelect,
ofNoDereferenceLinks // Note: do not always resolve symlinked files, some links are resolved later
];
// set InitialDir to // set InitialDir to
GetCurrentUnit(ASrcEdit,AnUnitInfo); GetCurrentUnit(ASrcEdit,AnUnitInfo);