From efe40170216ffde7f54f88fb1ffd527fcb694967 Mon Sep 17 00:00:00 2001 From: Loesje_ Date: Sat, 16 Oct 2010 16:37:07 +0000 Subject: [PATCH] * Set a default return value so that in case of a problem, Buffered_Open returns false git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1353 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- components/geckoport/nsInit.pas | 1 + 1 file changed, 1 insertion(+) diff --git a/components/geckoport/nsInit.pas b/components/geckoport/nsInit.pas index 6690ff4f4..527dc6186 100755 --- a/components/geckoport/nsInit.pas +++ b/components/geckoport/nsInit.pas @@ -1165,6 +1165,7 @@ type function BufferedFile_Open(name: PAnsiChar; out ret: TBufferedFile): Boolean; begin + result := false; try ret.fs:=TFileStream.Create(name,fmOpenRead, fmShareDenyWrite); result:=true;