diff options
| author |   millert <millert@openbsd.org> | 2004-04-07 21:12:13 +0000 |
|---|---|---|
| committer | millert <millert@openbsd.org> | 2004-04-07 21:12:13 +0000 |
| commit | 1b0c1ed84083c2966ca2436c25340d7804b6abd2 (patch) | |
| tree | fb235961cc7f3cddfb00cd2cb125a6b8608c3603 /gnu/usr.bin/perl/lib/warnings.pm | |
| parent | reflect reality. with lots of help from jmc@ (diff) | |
| download | wireguard-openbsd-1b0c1ed84083c2966ca2436c25340d7804b6abd2.tar.xz wireguard-openbsd-1b0c1ed84083c2966ca2436c25340d7804b6abd2.zip | |
perl 5.8.3 from CPAN
Diffstat (limited to 'gnu/usr.bin/perl/lib/warnings.pm')
| -rw-r--r-- | gnu/usr.bin/perl/lib/warnings.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gnu/usr.bin/perl/lib/warnings.pm b/gnu/usr.bin/perl/lib/warnings.pm index a4d41578b50..14ed715fdc9 100644 --- a/gnu/usr.bin/perl/lib/warnings.pm +++ b/gnu/usr.bin/perl/lib/warnings.pm @@ -133,7 +133,7 @@ See L<perlmodlib/Pragmatic Modules> and L<perllexwarn>. use Carp (); -our %Offsets : unique = ( +our %Offsets = ( # Warnings Categories added in Perl 5.008 @@ -186,7 +186,7 @@ our %Offsets : unique = ( 'y2k' => 92, ); -our %Bits : unique = ( +our %Bits = ( 'all' => "\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x15", # [0..46] 'ambiguous' => "\x00\x00\x00\x00\x00\x00\x00\x04\x00\x00\x00\x00", # [29] 'bareword' => "\x00\x00\x00\x00\x00\x00\x00\x10\x00\x00\x00\x00", # [30] @@ -236,7 +236,7 @@ our %Bits : unique = ( 'y2k' => "\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x10", # [46] ); -our %DeadBits : unique = ( +our %DeadBits = ( 'all' => "\xaa\xaa\xaa\xaa\xaa\xaa\xaa\xaa\xaa\xaa\xaa\x2a", # [0..46] 'ambiguous' => "\x00\x00\x00\x00\x00\x00\x00\x08\x00\x00\x00\x00", # [29] 'bareword' => "\x00\x00\x00\x00\x00\x00\x00\x20\x00\x00\x00\x00", # [30] |