Skip to content

Commit efd17f3

Browse files
committed
avoid using asciiname (two more places)
1 parent f8f5031 commit efd17f3

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

bin/paused

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -402,7 +402,7 @@ sub woe {
402402
my @To;
403403
my $pma = PAUSE::MailAddress->new_from_userid($userid);
404404
my $to = $pma->address;
405-
push @To, $PAUSE::Config->{ADMIN}, qq{"$asciiname" <$to>};
405+
push @To, $PAUSE::Config->{ADMIN}, qq{<$to>};
406406

407407
my $blurb = "The URL $hash->{uri},
408408
requested for upload as $hash->{uriid} has problems
@@ -536,7 +536,7 @@ sub welcome_file {
536536
my $dbh = $self->{DBH};
537537
my $pma = PAUSE::MailAddress->new_from_userid($userid);
538538
my $address = $pma->address;
539-
my @To = qq{"$asciiname" <$address>};
539+
my @To = qq{<$address>};
540540
unless ($PAUSE::Config->{TESTHOST}) {
541541
push @To, $PAUSE::Config->{TO_CPAN_TESTERS};
542542
push @To, $PAUSE::Config->{'P5P'} if

0 commit comments

Comments
 (0)