diff options
| author | Nick Ing-Simmons <nik@tiuk.ti.com> | 2003-01-17 15:10:34 +0000 |
|---|---|---|
| committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2003-01-17 14:12:53 +0000 |
| commit | 7bdbfeb78e66fc69fec82d24f7aedd5221926707 (patch) | |
| tree | d4d6582173aed02d83a8869959ca2bb1170d2fa9 /t | |
| parent | e8d7f3747c04a9bb10b98235d6cac8ff43bf8a54 (diff) | |
| download | perl-7bdbfeb78e66fc69fec82d24f7aedd5221926707.tar.gz | |
Re: 18457 on cygwin/20030113
Message-Id: <20030117151034.2651.3@bactrian.elixent.com>
p4raw-id: //depot/perl@18508
Diffstat (limited to 't')
| -rwxr-xr-x | t/io/tell.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/io/tell.t b/t/io/tell.t index 9aa39e842f..deb49ce03d 100755 --- a/t/io/tell.t +++ b/t/io/tell.t @@ -103,7 +103,7 @@ END { unlink($written) } close($tst); open($tst,">$written") || die "Cannot open $written:$!"; -binmode $TST if $Is_Dosish; +binmode $tst if $Is_Dosish; if (tell($tst) == 0) { print "ok 24\n"; } else { print "not ok 24\n"; } @@ -118,7 +118,7 @@ if (tell($tst) == 10) { print "ok 26\n"; } else { print "not ok 26\n"; } close($tst); open($tst,"+>>$written") || die "Cannot open $written:$!"; -binmode $TST if $Is_Dosish; +binmode $tst if $Is_Dosish; if (0) { |