summaryrefslogtreecommitdiff
path: root/pod/perlobj.pod
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2012-07-03 20:28:24 -0500
committerJesse Luehrs <doy@tozt.net>2012-07-03 20:28:46 -0500
commit77d38c8d80370651198e27f063fd889851daf560 (patch)
tree5639759fc20ace067b5ea4c82647494ea097aecc /pod/perlobj.pod
parenta0dffe9bf14c9669153ccc3d5c9341d4864848dd (diff)
downloadperl-77d38c8d80370651198e27f063fd889851daf560.tar.gz
fix perlobj SUPER example [perl #113972]
Diffstat (limited to 'pod/perlobj.pod')
-rw-r--r--pod/perlobj.pod6
1 files changed, 2 insertions, 4 deletions
diff --git a/pod/perlobj.pod b/pod/perlobj.pod
index 015b1c966c..bb0538a0d4 100644
--- a/pod/perlobj.pod
+++ b/pod/perlobj.pod
@@ -325,14 +325,12 @@ methods.
sub speak {
my $self = shift;
- $self->SUPER::speak();
-
say 'A';
}
package B;
- use parent 'A';
+ use parent -norequire, 'A';
sub speak {
my $self = shift;
@@ -344,7 +342,7 @@ methods.
package C;
- use parent 'B';
+ use parent -norequire, 'B';
sub speak {
my $self = shift;