Pārlūkot izejas kodu

amunits: Read()ing to a PChar is no longer supported, because it's unsafe

git-svn-id: trunk@27576 -
Károly Balogh 11 gadi atpakaļ
vecāks
revīzija
fabdebf9c6
1 mainītis faili ar 2 papildinājumiem un 2 dzēšanām
  1. 2 2
      packages/amunits/src/utilunits/linklist.pas

+ 2 - 2
packages/amunits/src/utilunits/linklist.pas

@@ -759,9 +759,9 @@ begin
       { I don't want end of lines here (for use with amiga listviews)
         just change this if you need newline characters.
       }
-         Read(Inf, buffer);
+         Read(Inf, buf);
          tempnode := AddNewNode(thelist,buffer);
-         Readln(inf, buffer);
+         Readln(inf, buf);
       end;
       CLose(Inf);
       FileToList := true;