diff options
| author | Karl Williamson <public@khwilliamson.com> | 2011-02-17 22:42:03 -0700 |
|---|---|---|
| committer | Karl Williamson <public@khwilliamson.com> | 2011-02-17 22:56:25 -0700 |
| commit | 8457b38f6553b1ed5f485478160b745dfe1b7fa9 (patch) | |
| tree | 5fdbad50c5811e449cd94a1ede8f7bca9d5f22ed /t/op/caller.t | |
| parent | 3a3294736cca38f33952338fa20bc02cffd21550 (diff) | |
| download | perl-8457b38f6553b1ed5f485478160b745dfe1b7fa9.tar.gz | |
Subclass utf8 warnings so can turn off individually
Diffstat (limited to 't/op/caller.t')
| -rw-r--r-- | t/op/caller.t | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/t/op/caller.t b/t/op/caller.t index d08e143324..a92b3eab21 100644 --- a/t/op/caller.t +++ b/t/op/caller.t @@ -111,8 +111,8 @@ sub testwarn { # The repetition number must be set to the value of $BYTES in # lib/warnings.pm - BEGIN { check_bits( ${^WARNING_BITS}, "\0" x 12, 'all bits off via "no warnings"' ) } - testwarn("\0" x 12, 'no bits'); + BEGIN { check_bits( ${^WARNING_BITS}, "\0" x 13, 'all bits off via "no warnings"' ) } + testwarn("\0" x 13, 'no bits'); use warnings; BEGIN { check_bits( ${^WARNING_BITS}, $default, |