[utils/git-notify] additions de headers spécifiques au Cr@ns

darcs-hash:20100328161719-ffbb2-b535d15e8ca89cf8b56d9d9abd581995db3a2320.gz
This commit is contained in:
Nicolas Dandrimont 2010-03-28 18:17:19 +02:00
parent d9054ab9b7
commit a4cad706aa

View file

@ -168,6 +168,10 @@ sub mail_notification($$$@)
print "To: $name\n";
print "Subject: $subject\n";
print "Content-Type: $content_type\n";
print "X-CVSinfo: CRANS\n";
print "X-DarcsInfo: CRANS-$repos_name\n";
print "X-GitInfo: CRANS-$repos_name\n";
print "\n", join("\n", @text), "\n";
}
else
@ -176,7 +180,12 @@ sub mail_notification($$$@)
return unless defined $pid;
if (!$pid)
{
exec $mailer, "-s", $subject, "-a", "Content-Type: $content_type", $name or die "Cannot exec $mailer";
exec ($mailer, "-s", $subject,
"-a", "Content-Type: $content_type",
"-a", "X-CVSinfo: CRANS",
"-a", "X-DarcsInfo: CRANS-$repos_name",
"-a", "X-GitInfo: CRANS-$repos_name",
$name) or die "Cannot exec $mailer";
}
print MAIL join("\n", @text), "\n";
close MAIL;
@ -290,7 +299,7 @@ sub send_commit_notice($$)
push @notice, "Diff: $gitweb_url/?a=commitdiff;h=$obj" if $gitweb_url;
}
$subject = $info{"author_name"} . ": " . ${$info{"log"}}[0];
$subject = "Git commit ($repos_name): " . ${$info{"log"}}[0];
}
mail_notification($commitlist_address, $subject, "text/plain; charset=UTF-8", @notice);