From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Wed, 29 May 2002 13:25:31 +0000 (+0000)
Subject: Spelling bee.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=43bb546a01e54de6c96472cbb373abf202b991da;p=p5sagit%2Fp5-mst-13.2.git

Spelling bee.

p4raw-id: //depot/perl@16859
---

diff --git a/t/op/tie.t b/t/op/tie.t
index 914db11..334b5b4 100755
--- a/t/op/tie.t
+++ b/t/op/tie.t
@@ -224,7 +224,7 @@ sub Self2::PRINT     { $printed = 1; }
     print $c 'Hello';
 }
 die "self-tied glob not PRINTed" unless $printed == 1;
-die "self-tied glob not DESTROYd" unless $destroyed == 1;
+die "self-tied glob not DESTROYed" unless $destroyed == 1;
 EXPECT
 ########
 
@@ -237,7 +237,7 @@ sub Self3::DESTROY   { $destroyed = 1; }
     my $c = geniosym;
     tie *$c, 'Self3', $c;
 }
-die "self-tied IO not DESTROYd" unless $destroyed == 1;
+die "self-tied IO not DESTROYed" unless $destroyed == 1;
 EXPECT
 ########