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

cody: fixed opening lpr file, bug #30787

Browse Source 
git-svn-id: trunk@53207 -
This commit is contained in:
mattias 2016-10-25 20:23:37 +00:00
parent a152fd580f
commit 98e64cab9d
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/codetools/ide/codyidentifiersdlg.pas
View File

@ -396,7 +396,7 @@ var
begin begin
if not IsApplicable(Msg,Identifier) then exit; if not IsApplicable(Msg,Identifier) then exit;
if LazarusIDE.DoOpenFileAndJumpToPos(Msg.GetFullFilename, if LazarusIDE.DoOpenFileAndJumpToPos(Msg.GetFullFilename,
Point(Msg.Column,Msg.Line),-1,-1,-1,[])<>mrOk then exit; Point(Msg.Column,Msg.Line),-1,-1,-1,[ofOnlyIfExists,ofRegularFile])<>mrOk then exit;
ShowUnitDictionaryDialog(nil); ShowUnitDictionaryDialog(nil);
end; end;