version 1.81, 2013/08/22 09:30:21
|
version 1.82, 2014/01/16 13:31:31
|
Line 374 foreach my $dom (@domains) {
|
Line 374 foreach my $dom (@domains) {
|
my $hostname = &Apache::lonnet::hostname($lonhost); |
my $hostname = &Apache::lonnet::hostname($lonhost); |
my $replytoaddress = 'do-not-reply@'.$hostname; |
my $replytoaddress = 'do-not-reply@'.$hostname; |
$msg->add('Reply-to',$replytoaddress); |
$msg->add('Reply-to',$replytoaddress); |
$msg->add('From',"www@$hostname"); |
$msg->add('From','www@'.$hostname); |
$msg->add('Content-type','text/plain; charset=UTF-8'); |
$msg->add('Content-type','text/plain; charset=UTF-8'); |
if (my $fh = $msg->open()) { |
if (my $fh = $msg->open()) { |
print $fh |
print $fh |