This takes a hash as argument.

This commit is contained in:
Bradley M. Kuhn 2016-01-02 10:36:35 -08:00
parent 215ac05484
commit 964755c3e3

View file

@ -59,8 +59,8 @@ foreach my $id (sort keys %idsSent) {
print STDERR $out;
next;
}
print "WOULD CALL: $sp->fulfillRequest($id, requestType => $request->{requestType},
who => $WHO, how => $HOW);\n";
$sp->fulfillRequest({ donorId => $id, requestType => $request->{requestType},
who => $WHO, how => $HOW});
my $emailTo = $sp->getPreferredEmailAddress($id);
if (not defined $emailTo) {