Cleanup key.
This commit is contained in:
parent
11d060a2fa
commit
5a16830b12
1 changed files with 2 additions and 1 deletions
|
@ -265,7 +265,8 @@ foreach my $ticket (@processList) {
|
||||||
} elsif ($line =~ /^\s*([^:]+)\s*:\s*(.+)$/) {
|
} elsif ($line =~ /^\s*([^:]+)\s*:\s*(.+)$/) {
|
||||||
my($key, $val) = ($1, $2);
|
my($key, $val) = ($1, $2);
|
||||||
# Note that this will take the last one used, since rt log gives ticket traffic IN ORDER.
|
# Note that this will take the last one used, since rt log gives ticket traffic IN ORDER.
|
||||||
if ($key =~ /(CONTRACTED NAME|PAYMENT NAME|PAYMENT METHOD)/i) {
|
$key =~ s/^\s*//; $key =~ s/\s*$//;
|
||||||
|
if ($key =~ /^(CONTRACTED NAME|PAYMENT NAME|PAYMENT METHOD)$/i) {
|
||||||
$paymentVals{$key} = $val;
|
$paymentVals{$key} = $val;
|
||||||
print STDERR "\"$ticket\": rt show $ticketNum line match: $key $val for $line\n" if ($VERBOSE > 7);
|
print STDERR "\"$ticket\": rt show $ticketNum line match: $key $val for $line\n" if ($VERBOSE > 7);
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in a new issue