diff options
author | Matthew Horsfall <wolfsage@gmail.com> | 2016-06-21 13:31:37 -0400 |
---|---|---|
committer | Matthew Horsfall <wolfsage@gmail.com> | 2016-06-21 13:43:18 -0400 |
commit | 21a5c8db3a272de4e9aec0faf8402cb19ce8dbc9 (patch) | |
tree | 79e0a7a322021c33a87620f650c9e50a35ae8d79 /lib | |
parent | e7acdfe976f01ee0d1ba31b3b1db61454a72d6c9 (diff) | |
download | perl-21a5c8db3a272de4e9aec0faf8402cb19ce8dbc9.tar.gz |
Sort @def before generating $warnings::DEFAULT.
This makes the comment easier to read.
Diffstat (limited to 'lib')
-rw-r--r-- | lib/warnings.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/warnings.pm b/lib/warnings.pm index ddb0c35e8d..d607f318de 100644 --- a/lib/warnings.pm +++ b/lib/warnings.pm @@ -5,7 +5,7 @@ package warnings; -our $VERSION = "1.36"; +our $VERSION = "1.37"; # Verify that we're called correctly so that warnings will work. # Can't use Carp, since Carp uses us! @@ -235,7 +235,7 @@ our %DeadBits = ( # These are used by various things, including our own tests our $NONE = "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0"; -our $DEFAULT = "\x10\x01\x00\x00\x00\x50\x04\x00\x00\x00\x00\x00\x00\x55\x51\x55\x00", # [2,58,59,52,55,60,61,53,56,54,62,4,63,22,23,25] +our $DEFAULT = "\x10\x01\x00\x00\x00\x50\x04\x00\x00\x00\x00\x00\x00\x55\x51\x55\x00", # [2,4,22,23,25,52..56,58..63] our $LAST_BIT = 132 ; our $BYTES = 17 ; |