my $host = `hostname`; chomp ($host);
$host = $default_host unless ($host =~ m/[.]/ || !defined($default_host));
-my $from_addr = "PG Build Farm <$me\@$host>";
+my $from_addr = "Exim BuildFarm <$me\@$host>";
$from_addr =~ tr /\r\n//d;
# $sth->finish;
$msg->to($mailto);
- $msg->subject("PGBuildfarm member $animal Branch $branch Alert cleared");
+ $msg->subject("Exim BuildFarm member $animal Branch $branch Alert cleared");
my $fh = $msg->open;
print $fh "\n\n$text\n";
$fh->close;
$msg->to($mailto);
- $msg->subject("PGBuildfarm member $animal Branch $branch " .
+ $msg->subject("Exim BuildFarm member $animal Branch $branch " .
"Alert notification");
my $fh = $msg->open;
print $fh "\n\n$text\n";