Conservancy/supporters
6
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

This is still is required; search by ID seems still broken.

Browse source
This commit is contained in:
Bradley M. Kuhn 2022-06-21 10:42:32 -07:00
parent bdd100540a
commit 71c0bd28aa
1 changed files with 6 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
scripts/find-supporter.plx
View file

@ -29,7 +29,12 @@ my $sp = new Supporters($dbh, ['none']);
my $found = 0; my $found = 0;
my(@supporterIds); my(@supporterIds);
die "Can only search on id, ledgerEntityId, emailAddress" unless $CRITERION =~ /^(ledgerEntityId|emailAddress|id)$/; die "Can only search on id, ledgerEntityId, emailAddress" unless $CRITERION =~ /^(ledgerEntityId|emailAddress|id)$/;
if ($CRITERION eq 'id') {
push(@supporterIds, $SEARCH_PARAMETER);
} else {
@supporterIds = $sp->findDonor({$CRITERION => $SEARCH_PARAMETER }); @supporterIds = $sp->findDonor({$CRITERION => $SEARCH_PARAMETER });
}
my @requestTypes = $sp->getRequestType(); my @requestTypes = $sp->getRequestType();
foreach my $id (@supporterIds) { foreach my $id (@supporterIds) {
$found = 1; $found = 1;