print a message & exit when there are no tickets to do.

This commit is contained in:
Bradley M. Kuhn 2018-08-23 13:53:32 -07:00
parent 4b0cdad67e
commit 90618aba6a

View file

@ -55,6 +55,11 @@ $INTERACTIVE = 0 if not defined $INTERACTIVE;
my @ticketSpecs = TicketIDsReadyForPayment(); my @ticketSpecs = TicketIDsReadyForPayment();
if (@ticketSpecs <= 0) {
print "No tickets found that are ready for payment at this time\n";
exit 0;
}
my %payments; my %payments;
foreach my $ticketSpec (@ticketSpecs) { foreach my $ticketSpec (@ticketSpecs) {
my $paymentMethod = FindMostRecentPaymentMethodForTicket($ticketSpec); my $paymentMethod = FindMostRecentPaymentMethodForTicket($ticketSpec);