diff options
| author | Brandon Black <blblack@gmail.com> | 2007-04-17 08:14:36 -0500 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-04-19 14:48:20 +0000 |
| commit | e1a479c5e0c08fb10925261f03573261c69ca0dc (patch) | |
| tree | 09088fd1ef489ff5660300a532f799144ff7ae6a /ext | |
| parent | 0a311364e00e9bf5b4fcb140ade49b02e46833dd (diff) | |
| download | perl-e1a479c5e0c08fb10925261f03573261c69ca0dc.tar.gz | |
Re: new C3 MRO patch
From: "Brandon Black" <blblack@gmail.com>
Message-ID: <84621a60704171114k29b0460el5b08ce5185d55ed5@mail.gmail.com>
p4raw-id: //depot/perl@30980
Diffstat (limited to 'ext')
| -rwxr-xr-x | ext/B/t/b.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/B/t/b.t b/ext/B/t/b.t index b750f12eff..e0e21f4a96 100755 --- a/ext/B/t/b.t +++ b/ext/B/t/b.t @@ -169,7 +169,7 @@ is(B::opnumber("chop"), 38, "Testing opnumber with opname (chop)"); { no warnings 'once'; my $sg = B::sub_generation(); - *Whatever::hand_waving = sub { }; + *UNIVERSAL::hand_waving = sub { }; ok( $sg < B::sub_generation, "sub_generation increments" ); } |