Procházet zdrojové kódy

+ Fixed bug reported by Tomasz Lipinski (2997)

michael před 21 roky
rodič
revize
d6a6a6237e
1 změnil soubory, kde provedl 5 přidání a 2 odebrání
  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
 
 }