Переглянути джерело

* removed wrong fillchar statement

peter 23 роки тому
батько
коміт
5e61e1cc80
1 змінених файлів з 5 додано та 2 видалено
  1. 5 2
      ide/wwinhelp.pas

+ 5 - 2
ide/wwinhelp.pas

@@ -268,7 +268,7 @@ end;
 
 procedure TTopicBlock.Read(var Buf; Count: longint);
 begin
-  FillChar(Buf,Sizeof(Buf),Count);
+  {FillChar(Buf,Sizeof(Buf),Count);}
   if Count>(DataSize-CurOfs) then
   begin
     Count:=Max(0,DataSize-CurOfs);
@@ -1677,7 +1677,10 @@ end;
 END.
 {
   $Log$
-  Revision 1.3  2002-09-07 15:40:50  peter
+  Revision 1.4  2002-11-27 20:07:03  peter
+    * removed wrong fillchar statement
+
+  Revision 1.3  2002/09/07 15:40:50  peter
     * old logs removed and tabs fixed
 
 }