diff options
Diffstat (limited to 't')
-rw-r--r-- | t/address.t | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/t/address.t b/t/address.t index e7c0d6a8..1f20702a 100644 --- a/t/address.t +++ b/t/address.t @@ -38,6 +38,11 @@ sub test_pkg { @names = $names->('"Quote Unneeded" <user@example.com>'); is_deeply(['Quote Unneeded'], \@names, 'extra quotes dropped'); + + my @emails = $emails->('Local User <user>'); + is_deeply([], \@emails , 'no address for local address'); + @names = $emails->('Local User <user>'); + is_deeply([], \@names, 'no address, no name'); } test_pkg('PublicInbox::Address'); |