feature.pm needed to be taught about "use feature ':5.12'"

diff --git a/dist/Module-CoreList/lib/Module/CoreList.pm b/dist/Module-CoreList/lib/Module/CoreList.pm
index 676ef66..e1418e4 100644 (file)
--- a/dist/Module-CoreList/lib/Module/CoreList.pm
+++ b/dist/Module-CoreList/lib/Module/CoreList.pm
@@ -14003,7 +14003,7 @@ for my $version ( sort { $a <=> $b } keys %released ) {
        'diagnostics'           => '1.19',
        'encoding'              => '2.6_01',
        'encoding::warnings'    => '0.11',
-       'feature'               => '1.15',
+       'feature'               => '1.16',
        'fields'                => '2.15',
        'filetest'              => '1.02',
        'if'                    => '0.05',

diff --git a/lib/feature.pm b/lib/feature.pm
index 103e3bb..1517c1f 100644 (file)
--- a/lib/feature.pm
+++ b/lib/feature.pm
@@ -1,6 +1,6 @@
 package feature;
 
-our $VERSION = '1.15';
+our $VERSION = '1.16';
 
 # (feature name) => (internal name, used in %^H)
 my %feature = (
@@ -20,6 +20,7 @@ our $hint_uni8bit = 0x00000800;
 my %feature_bundle = (
     "5.10" => [qw(switch say state)],
     "5.11" => [qw(switch say state unicode_strings)],
+    "5.12" => [qw(switch say state unicode_strings)],
 );
 
 # special case

diff --git a/pod/perl5120delta.pod b/pod/perl5120delta.pod
index 1d2e2ee..2088d72 100644 (file)
--- a/pod/perl5120delta.pod
+++ b/pod/perl5120delta.pod
@@ -862,7 +862,7 @@ This pragma turns on Unicode semantics for the case-changing operations
 internal UTF-8 flag set, but that contain single-byte characters between
 128 and 255.
 
-Upgraded from version 1.11 to 1.15.
+Upgraded from version 1.11 to 1.16.
 
 =item C<less>