diff --git a/scripts/rt-outreachy-payment-next.plx b/scripts/rt-outreachy-payment-next.plx index 4c2a1c9..843a436 100755 --- a/scripts/rt-outreachy-payment-next.plx +++ b/scripts/rt-outreachy-payment-next.plx @@ -238,6 +238,12 @@ while (my $file = readdir $dh) { } next; } + my $expectVal = 'payment-' . $PAYMENT_NUMBER . "-approved"; + if ($completedInternshipField eq $expectVal) { + print STDERR "\"$file\": \"$ticket\": $PAYMENT_NUMBER PAYMENT-DONE: Skipped: completed-internship is ", + "\"$completedInternshipField\" which indicates this payment round is in process.\n"; + next; + } my $expectVal = 'payment-' . $prevPayNum . "-approved"; if ($completedInternshipField ne $expectVal) { print STDERR "\"$file\": \"$ticket\": Skipped: completed-internship field was ", @@ -257,13 +263,13 @@ while (my $file = readdir $dh) { print STDERR "\"$file\": \"$ticket\": found a tax ticket of \"$taxTicket\"\n" if ($VERBOSE > 5); my $taxTicketStatus = GetStatusFromTicket($taxTicket); if ($taxTicketStatus ne "resolved") { - print STDERR "\"$file\": \"$ticket\": Tax Ticket: \"$taxTicket\": Skipped: ", + print STDERR "\"$file\": \"$ticket\": TAX-TICKET-PENDING: \"$taxTicket\": Skipped: ", "tax ticket is in status \"$taxTicketStatus\" instead of \"resolved\"\n"; next; } my $mainTicketStatus = GetStatusFromTicket($ticket); if ($mainTicketStatus ne "needs-project-ok") { - print STDERR "\"$file\": \"$ticket\": Skipped: ", + print STDERR "\"$file\": \"$ticket\": PREV-PAYMENT-INCOMPLETE: Skipped: ", "ticket is in status \"$mainTicketStatus\" instead of \"needs-project-ok\"\n"; next; }