From 5086c9d2039004aefe1bca55f73760f78b0fd698 Mon Sep 17 00:00:00 2001
From: George Hazan <george.hazan@gmail.com>
Date: Tue, 9 Oct 2012 14:56:52 +0000
Subject: fix for zlib1 import in pascal modules

git-svn-id: http://svn.miranda-ng.org/main/trunk@1844 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
---
 plugins/Utils.pas/zwrapper.pas | 8 ++++----
 plugins/Watrack/watrack.dpr    | 2 +-
 2 files changed, 5 insertions(+), 5 deletions(-)

(limited to 'plugins')

diff --git a/plugins/Utils.pas/zwrapper.pas b/plugins/Utils.pas/zwrapper.pas
index 7ccffafb14..bc6be65a43 100644
--- a/plugins/Utils.pas/zwrapper.pas
+++ b/plugins/Utils.pas/zwrapper.pas
@@ -6,14 +6,14 @@ function ZDecompressBuf(const inBuffer: Pointer; inSize: Integer; out outBuffer:
 
 implementation
 
-uses zlib;
+uses m_api;
 
 function ZDecompressBuf(const inBuffer: Pointer; inSize: Integer; out outBuffer: Pointer; out outSize: Integer; outEstimate: Integer): Integer;
 var
-  zstream           : TZStreamRec;
+  zstream           : z_stream;
   delta             : Integer;
 begin
-  FillChar(zstream, SizeOf(TZStreamRec), 0);
+  FillChar(zstream, SizeOf(z_stream), 0);
 
   delta := (inSize + 255) and not 255;
 
@@ -38,7 +38,7 @@ begin
         Inc(outSize, delta);
         ReallocMem(outBuffer, outSize);
 
-        zstream.next_out := {$IFDEF FPC}PBytef{$ENDIF}(pByte(outBuffer) + zstream.total_out);
+        zstream.next_out := PChar(pByte(outBuffer) + zstream.total_out);
         zstream.avail_out := delta;
         Result := inflate(zstream, Z_NO_FLUSH);
         if Result < 0 then Exit;
diff --git a/plugins/Watrack/watrack.dpr b/plugins/Watrack/watrack.dpr
index 2702c4852f..2d22375845 100644
--- a/plugins/Watrack/watrack.dpr
+++ b/plugins/Watrack/watrack.dpr
@@ -137,7 +137,7 @@ begin
     UTFToWide(dst^.mfile,si.mfile)
   else
     si.mfile:=dst^.mfile;
-}  
+}
   f:=Reset(dst^.mfile);
   if dword(f)<>INVALID_HANDLE_VALUE then
     GetFileTime(f,nil,nil,@dst^.date);
-- 
cgit v1.2.3