From: Nick Ing-Simmons <nik@tiuk.ti.com>
Date: Fri, 17 Jan 2003 14:04:18 +0000 (+0000)
Subject: Correct typo (actually copy/paste of wrong thing).
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=2022f30b5b153bfc2b0167458d493cc5150f1b5d;p=p5sagit%2Fp5-mst-13.2.git

Correct typo (actually copy/paste of wrong thing).

p4raw-id: //depot/perlio@18506
---

diff --git a/t/io/tell.t b/t/io/tell.t
index b3065d3..ddc29ff 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) 
 {