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

Merge branch 'master' from upstream.

Browse source
This commit is contained in:
Bradley M. Kuhn 2016-05-26 20:40:53 -07:00
commit 6fd18b6643
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
scripts/add-email-address.plx
View file

@ -39,7 +39,7 @@ my $sp = new Supporters($dbh, [ "none" ]);
$sp->addEmailAddress($supporterId, $email, $emailType); $sp->addEmailAddress($supporterId, $email, $emailType);
print "Preferred email address was: ", $sp->getPreferredEmailAddress($supporterId), "\n"; print "Preferred email address was: ", $sp->getPreferredEmailAddress($supporterId) || "(none)", "\n";
if ($preferred) { if ($preferred) {
$sp->setPreferredEmailAddress($supporterId, $email); $sp->setPreferredEmailAddress($supporterId, $email);
print "Preferred email address is now: ", $sp->getPreferredEmailAddress($supporterId), "\n"; print "Preferred email address is now: ", $sp->getPreferredEmailAddress($supporterId), "\n";