From: Paul Wise Date: Sun, 28 Feb 2021 01:59:52 +0000 (+0800) Subject: Fix pluralising the Tag/Usertag headers X-Git-Url: https://git.donarmstrong.com/debbugs.git/?a=commitdiff_plain;h=4367c48e7e4f434e11d325d0cb85551bced0958a;p=debbugs.git Fix pluralising the Tag/Usertag headers The match was on the lowercase version header names but the lowercasing happened after the header name match. --- diff --git a/scripts/process b/scripts/process index ecc0071..e80c738 100755 --- a/scripts/process +++ b/scripts/process @@ -233,9 +233,9 @@ for my $phline (@bodylines) my ($fn, $fv) = ($1, $2); $fv =~ s/\s*$//; # pluralize tag/usertag + $fn = lc $fn; $fn = $fn.'s' if $fn =~ /^(?:tag|usertag)$/; print {$debugfh} ">$fn|$fv|\n"; - $fn = lc $fn; if ($fn =~ /^control$/) { push @control_bits,$fv; } else {