Remove remaining POD tags in verbatim paragraphs

[p5sagit/p5-mst-13.2.git] / overload.pl

diff --git a/overload.pl b/overload.pl
index 01dd550..38331cb 100644 (file)
--- a/overload.pl
+++ b/overload.pl
@@ -58,9 +58,9 @@ our \@enums = qw#
     @enums
 #;
 
-{ my \$i; our %names = map { \$_ => ++\$i } \@names }
+{ my \$i = 0; our %names = map { \$_ => \$i++ } \@names }
 
-{ my \$i; our %enums = map { \$_ => ++\$i } \@enums }
+{ my \$i = 0; our %enums = map { \$_ => \$i++ } \@enums }
 
 EOF
 }
@@ -217,5 +217,6 @@ repeat_ass  (x=
 concat         (.
 concat_ass     (.=
 smart          (~~
+ftest           (-X
 # Note: Perl_Gv_AMupdate() assumes that DESTROY is the last entry
 DESTROY                DESTROY