diff options
author | Rick Delaney <rick@consumercontact.com> | 2007-10-30 13:19:40 -0700 |
---|---|---|
committer | Steve Peters <steve@fisharerojo.org> | 2008-02-13 18:39:50 +0000 |
commit | 781e3f050073176aa21ffc243184a1cb57f4ec92 (patch) | |
tree | 17bc74c72eb39bef0f518ff182db7c0e0f0549f0 /t | |
parent | cae86ea86570588a52f7ce8a0a01b6eb824103df (diff) | |
download | perl-781e3f050073176aa21ffc243184a1cb57f4ec92.tar.gz |
[perl #47047] Use of inherited AUTOLOAD for non-method is deprecated
From: Rick Delaney (via RT) <perlbug-followup@perl.org>
Message-ID: <rt-3.6.HEAD-24634-1193800780-55.47047-75-0@perl.org>
p4raw-id: //depot/perl@33302
Diffstat (limited to 't')
-rw-r--r-- | t/lib/warnings/gv | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/t/lib/warnings/gv b/t/lib/warnings/gv index 42565f2325..6086655383 100644 --- a/t/lib/warnings/gv +++ b/t/lib/warnings/gv @@ -39,6 +39,8 @@ sub Other::AUTOLOAD { 1 } sub Other::fred {} @ISA = qw(Other) ; use warnings 'deprecated' ; fred() ; +my $x = \&barney; +(bless[])->barney; EXPECT Use of inherited AUTOLOAD for non-method main::fred() is deprecated at - line 5. ######## |