Make mails appear to originate from cvs.reactos.com

CVSROOT

diff -u -r1.3 -r1.4
--- log_accum.pl	13 Apr 2004 12:33:45 -0000	1.3
+++ log_accum.pl	9 Aug 2004 17:52:59 -0000	1.4
@@ -29,6 +29,9 @@

 # set this to something that takes a whole message on stdin
 $MAILER	       = "/usr/lib/sendmail -t";
 

+# Name of host from which mail appears to come
+$MAIL_FROM_HOST = "cvs.reactos.com";
+

 #
 #	End user configurable options.
 #

@@ -224,7 +227,8 @@

 			  $DoW[$wday], $mday, $MoY[$mon], $year,
 			  $hour, $min, $sec, $tzoff, $TZ);
 

-    open(MAIL, "| $MAILER");

+    $sender = $login\@$MAIL_FROM_HOST;
+    open(MAIL, "| $MAILER -f$sender");

     print MAIL "Date:     " . $rfc822date . "\n";
     print MAIL "Subject:  CVS Update: " . $modulename . "\n";
     print MAIL "To:       " . $mailto . "\n";