IDE: fixed opening lpi as regular file (bug #7890)

git-svn-id: trunk@10248 -
This commit is contained in:
vincents 2006-11-27 09:40:45 +00:00
parent 17d8347bb9
commit 74f9716544

View File

@ -6255,6 +6255,7 @@ begin
Result:=DoOpenProjectFile(AFilename,[ofAddToRecent]);
exit;
end;
include(Flags, ofRegularFile);
end;
// check if file is a lazarus package (.lpk)
if (CompareFileExt(AFilename,'.lpk',false)=0) then begin