Correct link command.

This commit is contained in:
Bradley M. Kuhn 2018-09-22 17:30:25 -07:00
parent c385cda4e4
commit 9145aec8c5

View file

@ -294,8 +294,7 @@ while (my $file = readdir $dh) {
my $invoiceTicket = $INVOICE_LINE;
$invoiceTicket =~ s%^.*ticket/(\d+).*$%$1%;
my $num = $ticket; $num =~ s%^.*ticket/(\d+).*$%$1%;
system($RT_CMD, 'link', $invoiceTicket, 'refersto', $num);
system($RT_CMD, 'link', $invoiceTicket, 'refersto', $ticketNum);
if ($pass) {
open(my $rtCommentFH, "|-", $RT_CMD, 'comment', $ticket, '-m', '-');