From c056071159932b3b9c8454314887b6f45de2ae0f Mon Sep 17 00:00:00 2001
From: Eric Wong <e@80x24.org>
Date: Fri, 1 Jul 2016 06:11:13 +0000
Subject: address: filter out domain from address-as-name idents

It seems common for address entries to end up as:
	"foo@example" <foo@example>

Avoid needlessly displaying the domain name in that case.
---
 lib/PublicInbox/Address.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'lib/PublicInbox/Address.pm')

diff --git a/lib/PublicInbox/Address.pm b/lib/PublicInbox/Address.pm
index cd5fbfbe..e17d0b57 100644
--- a/lib/PublicInbox/Address.pm
+++ b/lib/PublicInbox/Address.pm
@@ -16,7 +16,9 @@ sub names {
 		my $e = $1;
 		s/\A['"\s]*//;
 		s/['"\s]*\z//;
-		$_ =~ /\S/ ? $_ : $e;
+		$e = $_ =~ /\S/ ? $_ : $e;
+		$e =~ s/\@\S+\z//;
+		$e;
 	} split(/\@+[\w\.\-]+>?\s*(?:,\s*|\z)/, $_[0]);
 }
 
-- 
cgit v1.2.3-24-ge0c7