--- loncom/loncron	2021/02/01 01:33:17	1.103.2.10
+++ loncom/loncron	2024/07/01 12:02:42	1.103.2.13
@@ -2,7 +2,7 @@
 
 # Housekeeping program, started by cron, loncontrol and loncron.pl
 #
-# $Id: loncron,v 1.103.2.10 2021/02/01 01:33:17 raeburn Exp $
+# $Id: loncron,v 1.103.2.13 2024/07/01 12:02:42 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -43,6 +43,8 @@ use IO::File;
 use IO::Socket;
 use HTML::Entities;
 use Getopt::Long;
+use GDBM_File qw(GDBM_READER);
+use Storable qw(thaw);
 use File::ReadBackwards;
 use File::Copy;
 use Sys::Hostname::FQDN();
@@ -1365,7 +1367,7 @@ sub main () {
     my $wwwid=getpwnam('www');
     if ($wwwid!=$<) {
 	print("User ID mismatch. This program must be run as user 'www'.\n");
-	my $emailto="$perlvar{'lonAdmEMail'},$perlvar{'lonSysEMail'}";
+	my $emailto="$perlvar{'lonAdmEMail'} $perlvar{'lonSysEMail'}";
 	my $subj="LON: $perlvar{'lonHostID'} User ID mismatch";
 	system("echo 'User ID mismatch. loncron must be run as user www.' |".
                " mail -s '$subj' $emailto > /dev/null");