Browse Source

+ Fixed bug reported by Tomasz Lipinski (2997)

michael 21 years ago
parent
commit
d6a6a6237e
1 changed files with 5 additions and 2 deletions
  1. 5 2
      fcl/inc/ezcgi.pp

+ 5 - 2
fcl/inc/ezcgi.pp

@@ -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
 
 }