From cfef21700f4177a26e55f0ea4508b4319a2e6725 Mon Sep 17 00:00:00 2001
From: peter <peter@freepascal.org>
Date: Mon, 10 Jan 2000 22:56:27 +0000
Subject: [PATCH]   * fixed gzopen parameter

---
 fcl/inc/zstream.pp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/fcl/inc/zstream.pp b/fcl/inc/zstream.pp
index 3fc5496ded..673379002a 100644
--- a/fcl/inc/zstream.pp
+++ b/fcl/inc/zstream.pp
@@ -410,7 +410,7 @@ Const OpenStrings : array[TGZOpenMode] of pchar = ('rb','wb');
 
 begin
    FOpenMode:=FileMode;
-   FFile:=gzopen (PChar(FileName),PBytef(Openstrings[FileMode]));
+   FFile:=gzopen (PChar(FileName),Openstrings[FileMode]);
    If FFile=Nil then
      Raise ezlibError.CreateFmt (SCouldntOpenFIle,[FileName]);
 end;