X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fshared%2Fxstreams.pas;h=c34f2e820989016fe9ec6e0f02fa6b690f9fde02;hb=a2e634cf318657af3a04f3c0a5caba4c158ac965;hp=270d292e88bc80464d699d34951672e4bfa1b4e4;hpb=2e947b5f49a88b13f489320be6129a85f097b9b2;p=d2df-sdl.git 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;