X-Git-Url: http://deadsoftware.ru/gitweb?p=d2df-sdl.git;a=blobdiff_plain;f=src%2Fshared%2Fxstreams.pas;h=c34f2e820989016fe9ec6e0f02fa6b690f9fde02;hp=270d292e88bc80464d699d34951672e4bfa1b4e4;hb=ecfa6c6b626717711a8ae93cc455f69f0048498a;hpb=b128e0179e7e6ebaf38e02d80015e50fb4e34933 diff --git a/src/shared/xstreams.pas b/src/shared/xstreams.pas index 270d292..c34f2e8 100644 --- a/src/shared/xstreams.pas +++ b/src/shared/xstreams.pas @@ -362,7 +362,7 @@ begin //writeln(' reading ', rd, ' bytes...'); rr := readBuf(buf, rd); //writeln(' got ', rr, ' bytes; fPos=', fPos, '; fSkipToPos=', fSkipToPos); - if rd <= 0 then raise XStreamError.Create('seek error'); + if rr <= 0 then raise XStreamError.Create('seek error'); end; //writeln(' pos: fPos=', fPos, '; fSkipToPos=', fSkipToPos); fSkipToPos := -1;