X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FScope%2FUpper.pm;h=ffd3c751298a97e8edc654d83c96223641e19e0e;hb=da0237ee151a65dff50933a7af535ea0541c2ac2;hp=51560158b054cb9532ebacbeb1b131fe34bed065;hpb=3bccb84b883d0410edb8401401e0ac296643caae;p=perl%2Fmodules%2FScope-Upper.git diff --git a/lib/Scope/Upper.pm b/lib/Scope/Upper.pm index 5156015..ffd3c75 100644 --- a/lib/Scope/Upper.pm +++ b/lib/Scope/Upper.pm @@ -98,10 +98,6 @@ The current level. The level of the scope just above C<$from>. -=head2 C - -The level of the scope just below C<$from>. - =head2 C The level of the closest subroutine context above C<$from>. @@ -224,7 +220,7 @@ will righteously set C<$num> to C<26>. The functions L, L, L, L, L and L are only exported on request, either individually or by the tags C<':funcs'> and C<':all'>. -Same goes for the words L, L, L, L, L, L and L that are only exported on request, individually or by the tags C<':words'> and C<':all'>. +Same goes for the words L, L, L, L, L and L that are only exported on request, individually or by the tags C<':words'> and C<':all'>. =cut @@ -233,7 +229,7 @@ use base qw/Exporter/; our @EXPORT = (); our %EXPORT_TAGS = ( funcs => [ qw/reap localize localize_elem localize_delete unwind want_at/ ], - words => [ qw/TOP HERE UP DOWN SUB EVAL CALLER/ ], + words => [ qw/TOP HERE UP SUB EVAL CALLER/ ], ); our @EXPORT_OK = map { @$_ } values %EXPORT_TAGS; $EXPORT_TAGS{'all'} = [ @EXPORT_OK ];