From e9fda329d958fca206543b92bc8ebea8e91eb43a Mon Sep 17 00:00:00 2001 From: Eric Wong Date: Sun, 23 Aug 2015 19:04:21 +0000 Subject: [PATCH] cleanup Email::Address usage Email::Address::name never fails assuming it was able to parse anything. --- lib/PublicInbox/Feed.pm | 2 +- lib/PublicInbox/MDA.pm | 2 -- lib/PublicInbox/View.pm | 1 - 3 files changed, 1 insertion(+), 4 deletions(-) diff --git a/lib/PublicInbox/Feed.pm b/lib/PublicInbox/Feed.pm index 51216aaa..f4d19e02 100644 --- a/lib/PublicInbox/Feed.pm +++ b/lib/PublicInbox/Feed.pm @@ -279,7 +279,7 @@ sub add_to_feed { my $type = index($title, '&') >= 0 ? "\ntype=\"html\"" : ''; my $from = mime_header($header_obj, 'From') or return 0; - my @from = Email::Address->parse($from); + my @from = Email::Address->parse($from) or return 0; my $name = PublicInbox::Hval->new_oneline($from[0]->name)->as_html; my $email = $from[0]->address; $email = PublicInbox::Hval->new_oneline($email)->as_html; diff --git a/lib/PublicInbox/MDA.pm b/lib/PublicInbox/MDA.pm index fe04ded9..16da7afa 100644 --- a/lib/PublicInbox/MDA.pm +++ b/lib/PublicInbox/MDA.pm @@ -88,9 +88,7 @@ sub author_info { my $from = $mime->header('From'); my @from = Email::Address->parse($from); my $name = $from[0]->name; - defined $name or $name = ''; my $email = $from[0]->address; - defined $email or $email = ''; ($name, $email, $mime->header('Date')); } diff --git a/lib/PublicInbox/View.pm b/lib/PublicInbox/View.pm index fe37a9fc..f4e72826 100644 --- a/lib/PublicInbox/View.pm +++ b/lib/PublicInbox/View.pm @@ -65,7 +65,6 @@ sub index_entry { my $from = PublicInbox::Hval->new_oneline($mime->header('From'))->raw; my @from = Email::Address->parse($from); $from = $from[0]->name; - (defined($from) && length($from)) or $from = $from[0]->address; $from = PublicInbox::Hval->new_oneline($from)->as_html; $subj = PublicInbox::Hval->new_oneline($subj)->as_html; -- 2.44.0