print a message & exit when there are no tickets to do.
This commit is contained in:
parent
4b0cdad67e
commit
90618aba6a
1 changed files with 5 additions and 0 deletions
|
@ -55,6 +55,11 @@ $INTERACTIVE = 0 if not defined $INTERACTIVE;
|
|||
|
||||
my @ticketSpecs = TicketIDsReadyForPayment();
|
||||
|
||||
if (@ticketSpecs <= 0) {
|
||||
print "No tickets found that are ready for payment at this time\n";
|
||||
exit 0;
|
||||
}
|
||||
|
||||
my %payments;
|
||||
foreach my $ticketSpec (@ticketSpecs) {
|
||||
my $paymentMethod = FindMostRecentPaymentMethodForTicket($ticketSpec);
|
||||
|
|
Loading…
Reference in a new issue