X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scripts%2Fprocess;h=bceb69cb186b4198267ad24014e67bd11b75d9bc;hb=64d0fa452631c6e228fad18f8ae469582e3734b3;hp=516bd314505089aee2e1ae84360714dbdd746efb;hpb=4a71b4c56f1bb4bfc9fb3fc7915511ea4a557800;p=debbugs.git diff --git a/scripts/process b/scripts/process index 516bd31..bceb69c 100755 --- a/scripts/process +++ b/scripts/process @@ -248,7 +248,7 @@ for my $key (grep /X-Debbugs-.*/i, keys %pheader) { # set $i to beginning of encoded body data, so we can dump it out # verbatim later my $i = 0; -++$i while $msg[$i] =~ /./; +++$i while $i <= $#msg and $msg[$i] =~ /./; $fwd .= join("\n",@msg[$i..$#msg]); binmode($debugfh,':raw');