my $msg = Email::MIME->new($str);
my $from = $msg->header('From');
- my $author = PublicInbox::Address::from_name($from);
+ my ($author) = PublicInbox::Address::names($from);
my ($email) = PublicInbox::Address::emails($from);
my $date = $msg->header('Date');
# now train it
local $ENV{GIT_AUTHOR_EMAIL} = 'trainer@example.com';
local $ENV{GIT_COMMITTER_EMAIL} = 'trainer@example.com';
+ local $ENV{GIT_COMMITTER_NAME} = undef;
IPC::Run::run([$learn, "spam"], \$msg);
is($?, 0, "no failure from learning spam");
IPC::Run::run([$learn, "spam"], \$msg);