diff --git a/components/codetools/ide/codyfindgdbline.pas b/components/codetools/ide/codyfindgdbline.pas index 85e3bed1b8..2a5320ad42 100644 --- a/components/codetools/ide/codyfindgdbline.pas +++ b/components/codetools/ide/codyfindgdbline.pas @@ -89,7 +89,8 @@ var begin CodyFindGDBLineDialog:=TCodyFindGDBLineDialog.Create(nil); try - CodyFindGDBLineDialog.ShowModal; + if CodyFindGDBLineDialog.ShowModal<>mrOk then exit; + LazarusIDE.DoOpenFileAndJumpToPos(CodyFindGDBLineDialog.SrcFilename,CodyFindGDBLineDialog.SrcXY,-1,-1,-1,[]); finally CodyFindGDBLineDialog.Free; end;