cvs: /CVSROOT loginfo.pl
| From: | Andrei Zmievski | Date: | Fri, 08 Oct 1999 15:23:38 +0000 |
| Subject: | cvs: /CVSROOT loginfo.pl | ||
| Groups: | php.dev | ||
| Request: | Send a blank email to php-dev+get-11630@lists.php.net to get a copy of this message | ||
andrei Fri Oct 8 11:23:38 1999 EDT
Modified files:
/CVSROOT loginfo.pl
Log:
Changes for cvs-daily list.
Index: CVSROOT/loginfo.pl
diff -u CVSROOT/loginfo.pl:1.14 CVSROOT/loginfo.pl:1.15
--- CVSROOT/loginfo.pl:1.14 Thu Oct 7 06:13:35 1999
+++ CVSROOT/loginfo.pl Fri Oct 8 11:23:07 1999
@@ -23,6 +23,11 @@
$mailto = $mailfrom;
$cvsuser = shift;
+if ($cvsuser eq "changelog") {
+ $envaddr = "php-cvs-daily-private\@lists.php.net";
+} else {
+ $envaddr = $mailto;
+}
@args = split(" ", $ARGV[0]);
$directory = $args[0];
@@ -46,7 +51,10 @@
while(<STDIN>) {
chop;
- if($state eq 5) { $logmsg .= $_."\n"; }
+ if($state eq 5) {
+ next if (/^@/);
+ $logmsg .= $_."\n";
+ }
if(/^Log Message/) { $state = 5; }
}
@@ -214,7 +222,7 @@
print "HELO cvsserver\r\n".
"MAIL FROM:<$mailfrom>\r\n".
-"RCPT TO:<$mailto>\r\n".
+"RCPT TO:<$envaddr>\r\n".
"DATA\r\n".
"$email\r\n".
".\r\n".