diff options
author | Father Chrysostomos <sprout@cpan.org> | 2011-06-22 08:19:55 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2011-06-22 08:21:14 -0700 |
commit | ab53f67c628467ba43cca815714c55e9353ee83d (patch) | |
tree | ae7a5ccb9f7872e1e24d11ecc19048c8960abd87 | |
parent | bb3abb059a118f508179df292a0a6e562767107f (diff) | |
download | perl-ab53f67c628467ba43cca815714c55e9353ee83d.tar.gz |
attrs.t: Test for something I almost broke
-rw-r--r-- | t/op/attrs.t | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/t/op/attrs.t b/t/op/attrs.t index 2567fa9082..339e5da48c 100644 --- a/t/op/attrs.t +++ b/t/op/attrs.t @@ -18,6 +18,9 @@ sub eval_ok ($;$) { is( $@, '', @_); } +fresh_perl_is 'use attributes; print "ok"', 'ok', + 'attributes.pm can load without warnings.pm already loaded'; + our $anon1; eval_ok '$anon1 = sub : method { $_[0]++ }'; eval 'sub e1 ($) : plugh ;'; |