paymentMethod should be lower case.
This commit is contained in:
parent
34e00ca5f0
commit
5e0433d39b
1 changed files with 1 additions and 1 deletions
|
@ -32,7 +32,7 @@ sub FindMostRecentPaymentMethodForTicket ($) {
|
||||||
open(my $rtShowFH, "-|", "$RT_CMD", "show", $ticketSpec);
|
open(my $rtShowFH, "-|", "$RT_CMD", "show", $ticketSpec);
|
||||||
while (my $showLine = <$rtShowFH>) {
|
while (my $showLine = <$rtShowFH>) {
|
||||||
print STDERR "rt show line for $ticketSpec: $showLine" if ($VERBOSE >= 10);
|
print STDERR "rt show line for $ticketSpec: $showLine" if ($VERBOSE >= 10);
|
||||||
$paymentMethod = $1
|
$paymentMethod = lc($1)
|
||||||
if ($showLine =~ /^\s*PAYMENT\s+METHOD\s*:\s*(.*?)\s*$/);
|
if ($showLine =~ /^\s*PAYMENT\s+METHOD\s*:\s*(.*?)\s*$/);
|
||||||
# don't 'last' when found as we want the last one.
|
# don't 'last' when found as we want the last one.
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in a new issue