Correct spelling of sv_insert error msg

It is already documented in perldiag with the right spelling.

diff --git a/sv.c b/sv.c
index e972476..6cbba65 100644 (file)
--- a/sv.c
+++ b/sv.c
@@ -5744,7 +5744,7 @@ Perl_sv_insert_flags(pTHX_ SV *const bigstr, const STRLEN offset, const STRLEN l
     PERL_ARGS_ASSERT_SV_INSERT_FLAGS;
 
     if (!bigstr)
-       Perl_croak(aTHX_ "Can't modify non-existent substring");
+       Perl_croak(aTHX_ "Can't modify nonexistent substring");
     SvPV_force_flags(bigstr, curlen, flags);
     (void)SvPOK_only_UTF8(bigstr);
     if (offset + len > curlen) {

diff --git a/t/porting/diag.t b/t/porting/diag.t
index c3ab904..68c7f4b 100644 (file)
--- a/t/porting/diag.t
+++ b/t/porting/diag.t
@@ -377,7 +377,6 @@ Can't coerce readonly %s to string in %s
 Can't fix broken locale name "%s"
 Can't get short module name from a handle
 Can't locate object method "%s" via package "%s" (perhaps you forgot to load "%s"?)
-Can't modify non-existent substring
 Can't open
 Can't open perl script "%s": %s
 Can't open %s