diff options
Diffstat (limited to 'lib/PublicInbox/Unsubscribe.pm')
-rw-r--r-- | lib/PublicInbox/Unsubscribe.pm | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/lib/PublicInbox/Unsubscribe.pm b/lib/PublicInbox/Unsubscribe.pm index 621a7e0f..ddbd7a2e 100644 --- a/lib/PublicInbox/Unsubscribe.pm +++ b/lib/PublicInbox/Unsubscribe.pm @@ -12,7 +12,7 @@ use warnings; use Crypt::CBC; use Plack::Util; use MIME::Base64 qw(decode_base64url); -my @CODE_URL = qw(http://ou63pmih66umazou.onion/public-inbox.git +my @CODE_URL = qw(http://7fh6tueqddpjyxjmgtdiueylzoqt6pt7hec3pukyptlmohoowvhde4yd.onion/public-inbox.git https://public-inbox.org/public-inbox.git); my @CT_HTML = ('Content-Type', 'text/html; charset=UTF-8'); @@ -81,10 +81,7 @@ sub _user_list_addr { } my $user = eval { $self->{cipher}->decrypt(decode_base64url($u)) }; if (!defined $user || index($user, '@') < 1) { - my $err = quotemeta($@); - my $errors = $env->{'psgi.errors'}; - $errors->print("error decrypting: $u\n"); - $errors->print("$_\n") for split("\n", $err); + warn "error decrypting: $u: ", ($@ ? quotemeta($@) : ()); $u = Plack::Util::encode_html($u); return r($self, 400, 'Bad request', "Failed to decrypt: $u"); } |