Author: adam-guest
Date: 2008-10-12 19:14:59 +0000 (Sun, 12 Oct 2008)
New Revision: 1666
Modified:
trunk/scripts/bts.pl
Log:
Don't attempt to extract an e-mail address from an undefined value for
(un)subscribe
Modified: trunk/scripts/bts.pl
===================================================================
--- trunk/scripts/bts.pl 2008-10-12 17:39:20 UTC (rev 1665)
+++ trunk/scripts/bts.pl 2008-10-12 19:14:59 UTC (rev 1666)
@@ -1663,7 +1663,7 @@
else {
$email ||= $ENV{'DEBEMAIL'};
$email ||= $ENV{'EMAIL'};
- $email = extractemail($email);
+ $email = extractemail($email) if defined $email;
}
opts_done(@_);
mailto('subscription request for bug #' . $bug, '',
@@ -1689,7 +1689,7 @@
else {
$email ||= $ENV{'DEBEMAIL'};
$email ||= $ENV{'EMAIL'};
- $email = extractemail($email);
+ $email = extractemail($email) if defined $email;
}
opts_done(@_);
mailto('unsubscription request for bug #' . $bug, '',
--
To unsubscribe, send mail to [EMAIL PROTECTED]
