--- loncom/lonmaxima 2013/07/04 11:44:44 1.42 +++ loncom/lonmaxima 2024/06/22 14:29:36 1.45 @@ -3,7 +3,7 @@ # The LearningOnline Network with CAPA # Connect to MAXIMA CAS # -# $Id: lonmaxima,v 1.42 2013/07/04 11:44:44 droeschl Exp $ +# $Id: lonmaxima,v 1.45 2024/06/22 14:29:36 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -154,10 +154,10 @@ $SIG{USR1} = \&child_announce_death; # ----------------------------- Make sure this process is running from user=www my $wwwid=getpwnam('www'); if ($wwwid!=$<) { - my $emailto="$perlvar{'lonAdmEMail'},$perlvar{'lonSysEMail'}"; + my $emailto="$perlvar{'lonAdmEMail'} $perlvar{'lonSysEMail'}"; my $subj="LON: User ID mismatch"; - system("echo 'User ID mismatch. lonmaxima must be run as user www.' |\ - mailto $emailto -s '$subj' > /dev/null"); + system("echo 'User ID mismatch. lonmaxima must be run as user www.' |". + " mail -s '$subj' $emailto > /dev/null"); exit 1; }