+ Fixed bug reported by Tomasz Lipinski (2997)

This commit is contained in:
michael 2004-03-01 09:46:42 +00:00
parent d2e73e010e
commit d6a6a6237e

View File

@ -253,7 +253,7 @@ begin
FQueryString := '';
for index := 0 to contentLength do
for index := 0 to contentLength-1 do
begin
Read(ch);
FQueryString := FQueryString + ch;
@ -406,7 +406,10 @@ end.
{
$Log$
Revision 1.4 2002-09-07 15:15:24 peter
Revision 1.5 2004-03-01 09:46:42 michael
+ Fixed bug reported by Tomasz Lipinski (2997)
Revision 1.4 2002/09/07 15:15:24 peter
* old logs removed and tabs fixed
}