Change 32038: Change a sv_catpv() to sv_catpvs().

[Nicholas Clark]

Change 32038 by [EMAIL PROTECTED] on 2007/10/05 23:02:16

        Change a sv_catpv() to sv_catpvs().

Affected files ...

... //depot/perl/mg.c#507 edit

Differences ...

==== //depot/perl/mg.c#507 (text) ====
Index: perl/mg.c
--- perl/mg.c#506~32032~        2007-10-05 09:08:12.000000000 -0700
+++ perl/mg.c   2007-10-05 16:02:16.000000000 -0700
@@ -942,7 +942,7 @@
            sv_setpv(sv,s);
        else {
            sv_setpv(sv,GvENAME(PL_defoutgv));
-           sv_catpv(sv,"_TOP");
+           sv_catpvs(sv,"_TOP");
        }
        break;
     case '~':
End of Patch.