CVSROOT/log_generate.pl - diff

Return to log_generate.pl CVS log

Up to [local] / CVSROOT

version 1.2, 1999/10/27 18:04:48

version 1.4, 2000/09/22 17:11:37

Line 1

#!/usr/bin/perl -w

# $OpenXM$

# $OpenXM: CVSROOT/log_generate.pl,v 1.3 1999/11/12 15:18:10 maekawa Exp $

# Most parts obtained from FreeBSD.org and modified for OpenXM

Line 292 sub mail_notification {

if ($debug) {

open(MAIL, "| /usr/sbin/mailsend -H $owner$dom");

} else {

open(MAIL, "| /usr/sbin/mailsend -H cvs-committers$dom");

open(MAIL, "| /usr/sbin/mailsend -H cvs-committers\@openxm\.org");

}

# This is turned off since the To: lines go overboard.

Line 349 sub mail_notification {

umask (002);

$host = hostname();

if ($host =~ /^kerberos\.math\.kobe-u\.ac\.jp$/i) {

if ($host =~ /^kerberos\.math\.sci\.kobe-u\.ac\.jp$/i) {

$dom = '@kerberos.math.kobe-u.ac.jp';

$dom = '@kerberos.math.sci.kobe-u.ac.jp';

$owner = 'maekawa';

}