loncom/loncron - diff

Return to loncron CVS log

Up to [LON-CAPA] / loncom

version 1.35, 2002/11/27 17:14:26	version 1.37, 2003/03/10 17:39:21
Line 9	Line 9
#	#
# 7/14,7/15,7/19,7/21,7/22,11/18,	# 7/14,7/15,7/19,7/21,7/22,11/18,
# 2/8 Gerd Kortemeyer	# 2/8 Gerd Kortemeyer
# 12/6/2000,12/8 Scott Harrison
# 12/23 Gerd Kortemeyer	# 12/23 Gerd Kortemeyer
# YEAR=2001	# YEAR=2001
# 1/10/2001, 2/12/, 2/26, 3/15, 04/11, 04/21,8/27 Scott Harrison
# 09/04,09/06,11/26 Gerd Kortemeyer	# 09/04,09/06,11/26 Gerd Kortemeyer
# YEAR=2002
# 5/11/2002 Scott Harrison

$\|=1;	$\|=1;

Line 809 rename ("$statusdir/newstatus.html","$st	Line 805 rename ("$statusdir/newstatus.html","$st

if ($totalcount>200) {	if ($totalcount>200) {
print "mailing\n";	print "mailing\n";
$emailto="$perlvar{'lonAdmEMail'},$perlvar{'lonSysEMail'}";	$emailto="$perlvar{'lonAdmEMail'}";
	if ($totalcount>600) {
	$emailto.=",$perlvar{'lonSysEMail'}";
	}
$subj="LON: $perlvar{'lonHostID'} E:$errors W:$warnings N:$notices";	$subj="LON: $perlvar{'lonHostID'} E:$errors W:$warnings N:$notices";
system(	system(
"metasend -b -t $emailto -s '$subj' -f $statusdir/index.html -m text/html");	"metasend -b -t $emailto -s '$subj' -f $statusdir/index.html -m text/html");