Преглед на файлове

* Write correct number of characters to log file

Michaël Van Canneyt преди 1 година
родител
ревизия
48d6f5e8a7
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      packages/fcl-web/src/base/fpwebclient.pp

+ 1 - 1
packages/fcl-web/src/base/fpwebclient.pp

@@ -278,7 +278,7 @@ begin
   if Assigned(FLogStream) then
     begin
     S:=Str+sLineBreak;
-    FlogStream.Write(S[1],length(str));
+    FlogStream.Write(S[1],length(S));
     end;
 end;