X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=pp_hot.c;h=7cbc00b22b5b61d1ebfa9ca6436631a50b014297;hb=73c20b238d7378e539b3486e16ad5c6e46696374;hp=70d4e6dd562f22e401cd98f76fcecc822704bd45;hpb=1e54db1a8aea187ba2e790aca2ab81fab24ff92d;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/pp_hot.c b/pp_hot.c
index 70d4e6d..7cbc00b 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -1872,8 +1872,7 @@ PP(pp_iter)
     }
     if (sv && SvREFCNT(sv) == 0) {
 	*itersvp = Nullsv;
-	Perl_croak(aTHX_
-	    "Use of freed value in iteration (perhaps you modified the iterated array within the loop?)");
+	Perl_croak(aTHX_ "Use of freed value in iteration");
     }
 
     if (sv)