From b065293ce7d55ebbde92ed0d004a06f42418f930 Mon Sep 17 00:00:00 2001
From: "Bradley M. Kuhn" <bkuhn@ebb.org>
Date: Sun, 20 Dec 2015 11:13:18 -0800
Subject: [PATCH] Correct hash lookup typo.

---
 Supporters/lib/Supporters.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Supporters/lib/Supporters.pm b/Supporters/lib/Supporters.pm
index 5ef3845..1e8d24a 100644
--- a/Supporters/lib/Supporters.pm
+++ b/Supporters/lib/Supporters.pm
@@ -502,7 +502,7 @@ Returns the id value of the request entry.
 sub addRequest($$) {
   my($self, $params) = @_;
   die "addRequest: undefined supporterId" unless defined $params->{supporterId};
-  my $supporterId = $params->supporterId;
+  my $supporterId = $params->{supporterId};
   die "addRequest: supporterId, \"$supporterId\" not found in supporter database"
     unless $self->_verifyId($supporterId);
   $self->_beginWork;