Add Entity lookup.

This commit is contained in:
Bradley M. Kuhn 2018-07-22 14:33:02 -07:00
parent 81b6fcefc1
commit 9b7858843b

View file

@ -101,7 +101,11 @@ while (my $file = readdir $dh) {
} }
# Find the ticket number for this intern. # Find the ticket number for this intern.
my $entity = LedgerTagFromTicket($ticket, 'Entity');
if (not defined $entity) {
print STDERR "\"$file\": \"$ticket\": Skipping: cannot determine Entity from ticket." ;
next;
}
my(@nameComponents) = split(/\s*-\s*/, $name); my(@nameComponents) = split(/\s*-\s*/, $name);
my(@searchTerms); my(@searchTerms);
foreach my $name (@nameComponents) { foreach my $name (@nameComponents) {