Use pvs macros instead of pvn where possible.

p4raw-id: //depot/perl@34653

1 files changed, 1 insertions, 1 deletions

diff --git a/pp_pack.c b/pp_pack.c
index 58a7dee508..dbbb34eddb 100644
--- a/pp_pack.c
+++ b/pp_pack.c
@@ -3592,7 +3592,7 @@ PP(pp_pack)
     register const char *patend = pat + fromlen;
 
     MARK++;
-    sv_setpvn(cat, "", 0);
+    sv_setpvs(cat, "");
     SvUTF8_off(cat);
 
     packlist(cat, pat, patend, MARK, SP + 1);