diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-05-29 13:25:31 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-05-29 13:25:31 +0000 |
commit | 43bb546a01e54de6c96472cbb373abf202b991da (patch) | |
tree | ec6a00991a5afaa816ce0e758cea94d715b41c32 /t | |
parent | 87f0b2135fb8ed0f01fabb0bd9eac630ea278e75 (diff) | |
download | perl-43bb546a01e54de6c96472cbb373abf202b991da.tar.gz |
Spelling bee.
p4raw-id: //depot/perl@16859
Diffstat (limited to 't')
-rwxr-xr-x | t/op/tie.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/op/tie.t b/t/op/tie.t index 914db116a0..334b5b486d 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 ######## |