diff --git a/utils/git-notify b/utils/git-notify index d79cfccd..7cdad441 100755 --- a/utils/git-notify +++ b/utils/git-notify @@ -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);