File tree Expand file tree Collapse file tree 1 file changed +2
-2
lines changed
Expand file tree Collapse file tree 1 file changed +2
-2
lines changed Original file line number Diff line number Diff 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},
408408requested 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
You can’t perform that action at this time.
0 commit comments