This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Make (caller $n)[9] respect std warnings
authorFather Chrysostomos <sprout@cpan.org>
Fri, 14 Sep 2012 06:33:03 +0000 (23:33 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Sat, 15 Sep 2012 05:29:44 +0000 (22:29 -0700)
commitf07626add3eda6dfda7c5f6fe05cbe1c9293ccd2
treea1762b06a4a7cc29cc6504beead035305a109e80
parent38248b9d23f2dd91529d8b3c32ad8f5f3ec93950
Make (caller $n)[9] respect std warnings

In commit 7e4f04509c6 I forgot about caller.  This commit makes the
value returned by (caller $n)[9] assignable to ${^WARNING_BITS} to
produce exactly the same warnings settings, including warnings con-
trolled by $^W.
pp_ctl.c
t/op/caller.t