version 1.14, 2003/01/27 00:47:19
|
version 1.15, 2003/03/10 17:34:52
|
Line 330 sub clean_exit
|
Line 330 sub clean_exit
|
delete $perlvar{'lonSqlAccess'}; # remove since sensitive |
delete $perlvar{'lonSqlAccess'}; # remove since sensitive |
|
|
# Set metadata for the e-mail. |
# Set metadata for the e-mail. |
my $emailto = "$perlvar{'lonAdmEMail'},$perlvar{'lonSysEMail'}"; |
my $emailto = "$perlvar{'lonAdmEMail'}"; |
|
|
my $subj=$perlvar{'lonHostID'}.', RPMS to upgrade'; |
my $subj=$perlvar{'lonHostID'}.', RPMS to upgrade'; |
|
|