diff options
author | Chip Salzenberg <chip@atlantic.net> | 1997-04-01 12:01:35 +1200 |
---|---|---|
committer | Chip Salzenberg <chip@atlantic.net> | 1997-04-01 12:01:35 +1200 |
commit | 14870ecde11bcf4aefbaa822f23042d2bbd7bd0a (patch) | |
tree | a457af1261042a740849034120fcba4717e01699 | |
parent | bbc6b0c70abf7d94d76d42e14766d95f09208cc9 (diff) | |
download | perl-14870ecde11bcf4aefbaa822f23042d2bbd7bd0a.tar.gz |
Fix MM doc's use of "SUPER::"
(this is the same change as commit acce7d4e04d89207299003c3e80c69d50bc82069, but as applied)
-rw-r--r-- | lib/ExtUtils/MakeMaker.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/ExtUtils/MakeMaker.pm b/lib/ExtUtils/MakeMaker.pm index eb49f3e55f..0898b751ef 100644 --- a/lib/ExtUtils/MakeMaker.pm +++ b/lib/ExtUtils/MakeMaker.pm @@ -1687,7 +1687,8 @@ either say: or you can edit the default by saying something like: sub MY::c_o { - my($inherited) = shift->SUPER::c_o(@_); + package MY; # so that "SUPER" works right + my $inherited = shift->SUPER::c_o(@_); $inherited =~ s/old text/new text/; $inherited; } |