Hi,
I try to use the possibility to get send an email to all developers, when somebody
commits a file. In the manuel it is described, that you have to copy the file log.pl
to the CVSROOT directory: The first few lines are as followed:
$cvsroot = $ENV{'CVSROOT'};
$) = $(;
$dostatus = 1;
while (@ARGV) {
$arg = shift @ARGV;
if ($arg eq '-m') {
$users = "$users " . shift @ARGV;
} elsif ($arg eq '-u') {
$login = shift @ARGV;
} elsif ($arg eq '-f') {
($logfile) && die "Too many '-f' args"; #print "bernd 3\n";
$logfile = shift @ARGV;
} elsif ($arg eq '-s') {
$dostatus = 0;
}
else {
($donefiles) && die "Too many arguments!\n";
$donefiles = 1;
@files = split(/ /, $arg);
}
}
the entry in the commitinfo-file is for example:
ALL $CVSROOT/log.pl %s -f $CVSROOT/CVSROOT/commitlog -m crouse@server
as it is described in the manuel as well.
My problem is, that when I use the commit command cvs start to read the log.pl -
script and then leaves the script, with the message "Too many arugments"
(else-command).
I don't know anything about perl script ... has anybody an idea what to do, or has
anybody a better log.pl-file?
Thanks.
Bernd
_______________________________________________
Info-cvs mailing list
[EMAIL PROTECTED]
http://mail.gnu.org/mailman/listinfo/info-cvs
