From 98e64cab9d00cc02b2dabce0d9fbc7647b9d0f1a Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Tue, 25 Oct 2016 20:23:37 +0000
Subject: [PATCH] cody: fixed opening lpr file, bug #30787

git-svn-id: trunk@53207 -
---
 components/codetools/ide/codyidentifiersdlg.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/codetools/ide/codyidentifiersdlg.pas b/components/codetools/ide/codyidentifiersdlg.pas
index 8c79acc5ee..045ee15d0e 100644
--- a/components/codetools/ide/codyidentifiersdlg.pas
+++ b/components/codetools/ide/codyidentifiersdlg.pas
@@ -396,7 +396,7 @@ var
 begin
   if not IsApplicable(Msg,Identifier) then exit;
   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);
 end;