diff options
| author | Rafael Garcia-Suarez <rgs@consttype.org> | 2015-07-06 08:09:04 +0200 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgs@consttype.org> | 2015-07-06 08:10:23 +0200 |
| commit | 8b7906d1719d3641e1ea0c94d934ecce176275cb (patch) | |
| tree | 16e2eec21d3f0b8e14a2641b1248432ed9bcaed0 | |
| parent | deaaea8c017369305bf7859858531c736ca7ed4b (diff) | |
| download | perl-8b7906d1719d3641e1ea0c94d934ecce176275cb.tar.gz | |
Some nits in perlsub
- DOES was not listed in the list of methods with reserved names
- Remove one useless instance of empty list assignment
- Punctuation
| -rw-r--r-- | pod/perlsub.pod | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/pod/perlsub.pod b/pod/perlsub.pod index f057b96ef7..48f178ffa3 100644 --- a/pod/perlsub.pod +++ b/pod/perlsub.pod @@ -258,11 +258,11 @@ C<AUTOLOAD> =item documented in L<perlmod> -C<CLONE>, C<CLONE_SKIP>, +C<CLONE>, C<CLONE_SKIP> =item documented in L<perlobj> -C<DESTROY> +C<DESTROY>, C<DOES> =item documented in L<perltie> @@ -1289,7 +1289,7 @@ of all their former last elements: sub popmany { my $aref; - my @retlist = (); + my @retlist; foreach $aref ( @_ ) { push @retlist, pop @$aref; } |