Bommels05/Mozilla
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Try to support a wider range of machines. Thanks to Dave Morrison <dave@bnl.gov> for the patch.

Browse Source 
git-svn-id: svn://10.0.0.236/trunk@44593 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
slamm%netscape.com
1999-08-26 01:14:49 +00:00
parent 72bc2ae56c
commit 20cf31ad16
1 changed files with 4 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
mozilla/webtools/tinderbox/Backwards.pm
View File

@@ -36,14 +36,14 @@ sub new {
# open the file for reading
unless( sysopen( $handle, $filename, O_RDONLY ) ) {
unless( open( $handle, $filename ) ) {
carp "Can't open $filename $!" ;
return ;
}
# seek to the end of the file
seek( $handle, 0, 2 ) ;
sysseek( $handle, 0, 2 ) ;
$seek_pos = tell( $handle ) ;
# get the size of the first block to read,
@@ -115,12 +115,13 @@ sub readline {
$seek_pos -= $read_size ;
$self->{'seek_pos'} = $seek_pos ;
seek( $handle, $seek_pos, 0 ) ;
sysseek( $handle, $seek_pos, 0 ) ;
#print "seek $seek_pos\n" ;
# read in the next (previous) block of text
sysseek($handle, 0, 1);
$read_cnt = sysread( $handle, $read_buf, $read_size ) ;
#print "Read <$read_buf>\n" ;