X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=pp_pack.c;h=594144e5fd5fdd1c671a21f5b3129665a0932240;hb=78d3e1bf81e401020937b98d17bdfe2107623029;hp=ceb01c5a57ee822ff2292a6649aacdf91383f5a2;hpb=3bf38418777094bb685265138234ab6e04aa1d90;p=p5sagit%2Fp5-mst-13.2.git diff --git a/pp_pack.c b/pp_pack.c index ceb01c5..594144e 100644 --- a/pp_pack.c +++ b/pp_pack.c @@ -1843,7 +1843,7 @@ PP(pp_pack) fromstr = NEXTFROM; aptr = SvPV(fromstr, fromlen); SvGROW(cat, fromlen * 4 / 3); - if (len <= 1) + if (len <= 2) len = 45; else len = len / 3 * 3;