version 1.20, 2001/04/21 15:22:37
|
version 1.21, 2001/04/24 15:55:13
|
Line 680 if ($totalcount>200) {
|
Line 680 if ($totalcount>200) {
|
$emailto="$perlvar{'lonAdmEMail'},$perlvar{'lonSysEMail'}"; |
$emailto="$perlvar{'lonAdmEMail'},$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") |
|
unless $qflag; |
} |
} |
1; |
1; |
|
|