1 files changed, 3 insertions, 3 deletions
diff --git a/av.c b/av.c
index fb01f48a09..b15f6ff7b6 100644
--- a/av.c
+++ b/av.c
@@ -697,9 +697,9 @@ Perl_av_unshift(pTHX_ AV *av, I32 num)
 /*
 =for apidoc av_shift
 
-Shifts an SV off the beginning of the
-array.  Returns C<&PL_sv_undef> if the 
-array is empty.
+Removes one SV from the start of the array, reducing its size by one and
+returning the SV (transferring control of one reference count) to the
+caller.  Returns C<&PL_sv_undef> if the array is empty.
 
 Perl equivalent: C<shift(@myarray);>