X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FScope-Context.git;a=blobdiff_plain;f=lib%2FScope%2FContext.pm;fp=lib%2FScope%2FContext.pm;h=6658c3cfe8596208bdb09fd4ccca799230192cbf;hp=cd0d63067321cbd2f480427e728a25c9e6e1ecb4;hb=3c4dd9fbf7894245f46e02300a54df2971e12a27;hpb=ef7fb9be92dc53c6846a6021f4681a6ef23197b3

diff --git a/lib/Scope/Context.pm b/lib/Scope/Context.pm
index cd0d630..6658c3c 100644
--- a/lib/Scope/Context.pm
+++ b/lib/Scope/Context.pm
@@ -365,7 +365,7 @@ sub up {
     my $sub_cxt = $cxt->sub($frames);
     my $sub_cxt = Scope::Context->sub;
 
-Returns a new L<Scope::Context> object pointing to the C<$frames>-th subroutine scope above the scope pointed by the invocant.
+Returns a new L<Scope::Context> object pointing to the C<$frames + 1>-th subroutine scope above the scope pointed by the invocant.
 
 This method can also be invoked as a class method, in which case it is equivalent to calling L</sub> on a L<Scope::Context> object for the current context.
 
@@ -409,7 +409,7 @@ sub sub {
     my $eval_cxt = $cxt->eval($frames);
     my $eval_cxt = Scope::Context->eval;
 
-Returns a new L<Scope::Context> object pointing to the C<$frames>-th C<eval> scope above the scope pointed by the invocant.
+Returns a new L<Scope::Context> object pointing to the C<$frames + 1>-th C<eval> scope above the scope pointed by the invocant.
 
 This method can also be invoked as a class method, in which case it is equivalent to calling L</eval> on a L<Scope::Context> object for the current context.