From 80c25bda92cf269e5aeeae64ad22bb6600d3a0a8 Mon Sep 17 00:00:00 2001
From: marco <marco@freepascal.org>
Date: Sun, 23 Dec 2012 19:52:52 +0000
Subject: [PATCH]  * make onprogress public. Mantis #23476

git-svn-id: trunk@23218 -
---
 packages/paszlib/src/zstream.pp | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/packages/paszlib/src/zstream.pp b/packages/paszlib/src/zstream.pp
index 4213188b8a..714a816808 100644
--- a/packages/paszlib/src/zstream.pp
+++ b/packages/paszlib/src/zstream.pp
@@ -63,6 +63,7 @@ type
           function write(const buffer;count:longint):longint;override;
           procedure flush;
           function get_compressionrate:single;
+          property OnProgress;
         end;
 
         Tdecompressionstream=class(Tcustomzlibstream)
@@ -77,6 +78,7 @@ type
           function read(var buffer;count:longint):longint;override;
           function seek(offset:longint;origin:word):longint;override;
           function get_compressionrate:single;
+          property OnProgress;
         end;
 
         TGZFileStream = Class(TStream)