From 77d38c8d80370651198e27f063fd889851daf560 Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Tue, 3 Jul 2012 20:28:24 -0500 Subject: [PATCH] fix perlobj SUPER example [perl #113972] --- pod/perlobj.pod | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/pod/perlobj.pod b/pod/perlobj.pod index 015b1c9..bb0538a 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; -- 2.7.4