From 964755c3e316867b0e61463287c75e92da2292e7 Mon Sep 17 00:00:00 2001
From: "Bradley M. Kuhn" <bkuhn@ebb.org>
Date: Sat, 2 Jan 2016 10:36:35 -0800
Subject: [PATCH] This takes a hash as argument.

---
 scripts/send-t-shirts.plx | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/scripts/send-t-shirts.plx b/scripts/send-t-shirts.plx
index 9058c2f..c8e6724 100644
--- a/scripts/send-t-shirts.plx
+++ b/scripts/send-t-shirts.plx
@@ -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) {