X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=universal.c;h=75e6c5eae43f32a062a878100ce7b25e33946441;hb=333b7451c3645c70d019a85ff880dce1977c7857;hp=ca69243ca6bda4cdf607e8cce9f3954c56840f75;hpb=b7953727b0415d171133ea7caa7aca5672129f99;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/universal.c b/universal.c
index ca69243..75e6c5e 100644
--- a/universal.c
+++ b/universal.c
@@ -305,7 +305,7 @@ XS(XS_UNIVERSAL_VERSION)
 
 	if (SvNV(req) > SvNV(sv))
 	    Perl_croak(aTHX_ "%s version %s required--this is only version %s",
-		  HvNAME(pkg), SvPV(req,len), SvPV(sv,len));
+		       HvNAME(pkg), SvPV_nolen(req), SvPV_nolen(sv));
     }
 
 finish: