Use two colons for lexsub warning

3 files changed, 10 insertions, 21 deletions

diff --git a/pod/perldiag.pod b/pod/perldiag.pod
index fee150635d..f12264c075 100644
--- a/pod/perldiag.pod
+++ b/pod/perldiag.pod
@@ -1864,7 +1864,7 @@ as a return, a goto, or a loop control statement.
 
 (F) To use lexical subs, you must first enable them:
 
-    no warnings 'experimental:lexical_subs';
+    no warnings 'experimental::lexical_subs';
     use feature 'lexical_subs';
     my sub foo { ... }
 
@@ -4785,7 +4785,7 @@ to use the feature, but know that in doing so you are taking the risk
 of using an experimental feature which may change or be removed in a
 future Perl version:
 
-    no warnings "experimental:lexical_subs";
+    no warnings "experimental::lexical_subs";
     use feature "lexical_subs";
 
 =item The %s function is unimplemented
diff --git a/pod/perllexwarn.pod b/pod/perllexwarn.pod
index 3b6b827a36..c6494dbbb7 100644
--- a/pod/perllexwarn.pod
+++ b/pod/perllexwarn.pod
@@ -220,7 +220,9 @@ The current hierarchy is:
          |
          +- exiting
          |
-         +- experimental
+         +- experimental --+
+         |                 |
+         |                 +- experimental::lexical_subs
          |
          +- glob
          |
@@ -337,19 +339,6 @@ Note: In Perl 5.6.1, the lexical warnings category "deprecated" was a
 sub-category of the "syntax" category. It is now a top-level category
 in its own right.
 
-=head2 Individual Warning IDs
-
-The "experimental" warnings category, added in Perl 5.18,
-contains IDs for individual warnings, so that each warning can
-be turned on or off.  Currently there is only one such warning,
-labelled "experimental:lexical_subs".  You enable and disable
-it like this:
-
-    use warnings "experimental:lexical_subs";
-    no  warnings "experimental:lexical_subs";
-
-The plan is to extend this convention to all warnings in a future release.
-
 =head2 Fatal Warnings
 X<warning, fatal>
 
diff --git a/pod/perlsub.pod b/pod/perlsub.pod
index 993b2b5467..87d45d30ac 100644
--- a/pod/perlsub.pod
+++ b/pod/perlsub.pod
@@ -830,7 +830,7 @@ modified or removed in future versions of Perl.
 
 Lexical subroutines are only available under the C<use feature
 'lexical_subs'> pragma, which produces a warning unless the
-"experimental:lexical_subs" warning is disabled.
+"experimental::lexical_subs" warnings category is disabled.
 
 Beginning with Perl 5.18, you can declare a private subroutine with C<my>
 or C<state>.  As with state variables, the C<state> keyword is only
@@ -839,7 +839,7 @@ available under C<use feature 'state'> or C<use 5.010> or higher.
 These subroutines are only visible within the block in which they are
 declared, and only after that declaration:
 
-    no warnings "experimental:lexical_subs";
+    no warnings "experimental::lexical_subs";
     use feature 'lexical_subs';
 
     foo();		# calls the package/global subroutine
@@ -871,7 +871,7 @@ containing block to the next.
 So, in general, "state" subroutines are faster.  But "my" subs are
 necessary if you want to create closures:
 
-    no warnings "experimental:lexical_subs";
+    no warnings "experimental::lexical_subs";
     use feature 'lexical_subs';
 
     sub whatever {
@@ -894,7 +894,7 @@ subroutine of the same name.
 The two main uses for this are to switch back to using the package sub
 inside an inner scope:
 
-    no warnings "experimental:lexical_subs";
+    no warnings "experimental::lexical_subs";
     use feature 'lexical_subs';
 
     sub foo { ... }
@@ -912,7 +912,7 @@ and to make a subroutine visible to other packages in the same scope:
 
     package MySneakyModule;
 
-    no warnings "experimental:lexical_subs";
+    no warnings "experimental::lexical_subs";
     use feature 'lexical_subs';
 
     our sub do_something { ... }