An obsoleted diagnostic.

[p5sagit/p5-mst-13.2.git] / pod / perl5004delta.pod

diff --git a/pod/perl5004delta.pod b/pod/perl5004delta.pod
index 2ade235..85a8f96 100644 (file)
--- a/pod/perl5004delta.pod
+++ b/pod/perl5004delta.pod
@@ -1489,7 +1489,7 @@ subroutine, and outside that is another subroutine; and the anonymous
 (innermost) subroutine is referencing a lexical variable defined in
 the outermost subroutine.  For example:
 
-   sub outermost { my $x; sub middle { sub { $x } } }
+   sub outermost { my $a; sub middle { sub { $a } } }
 
 If the anonymous subroutine is called or referenced (directly or
 indirectly) from the outermost subroutine, it will share the variable