summaryrefslogtreecommitdiff
path: root/packages/unzip
diff options
context:
space:
mode:
authormarco <marco@3ad0048d-3df7-0310-abae-a5850022a9f2>2008-12-06 12:22:10 +0000
committermarco <marco@3ad0048d-3df7-0310-abae-a5850022a9f2>2008-12-06 12:22:10 +0000
commitd0618de225ad629adce77f8e5b32fe34777fe2b5 (patch)
treef9f727210473b020da84584f9eeb6a8e88422748 /packages/unzip
parent35643a0f3378c1ed22476a07cdb85097e40cac27 (diff)
downloadfpc-d0618de225ad629adce77f8e5b32fe34777fe2b5.tar.gz
* a local buffer for pchar based filename handling was still at TP sizes
(80), and did not follow the libraries abstraction (array [tfsize]) for length of paths. (Reporter Lichtwicht, lazarusforum.de) git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@12306 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'packages/unzip')
-rw-r--r--packages/unzip/src/unzip.pp2
1 files changed, 1 insertions, 1 deletions
diff --git a/packages/unzip/src/unzip.pp b/packages/unzip/src/unzip.pp
index b9683bc407..7afe1c8944 100644
--- a/packages/unzip/src/unzip.pp
+++ b/packages/unzip/src/unzip.pp
@@ -2225,7 +2225,7 @@ FUNCTION unzipfile ( in_name : pchar;out_name : pchar;offset : longint;
hFileAction : word;cm_index : integer ) : integer;
VAR err : integer;
header : plocalheader;
- buf : ARRAY [ 0..80 ] of char;
+ buf : ARRAY [ 0..tfSize+1 ] of char;
{$ifndef unix}
buf0 : ARRAY [ 0..3 ] of char;
{$endif}