loncom/homework/grades.pm - diff

Return to grades.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.77, 2003/03/27 20:36:01	version 1.78, 2003/03/27 21:26:07
Line 1359 sub processHandGrade {	Line 1359 sub processHandGrade {
}	}
$message =~ s/<([^>]\|\n)*>//g; # removes html codes Or should this be lonnet::escape ??	$message =~ s/<([^>]\|\n)*>//g; # removes html codes Or should this be lonnet::escape ??
$message.="\n\nPoint".($pts > 1 ? 's':'').' awarded = '.$pts.' out of '.$wgt;	$message.="\n\nPoint".($pts > 1 ? 's':'').' awarded = '.$pts.' out of '.$wgt;
$message.=" for <a href=\"/res/$url\">$ENV{'form.probTitle'}</a>";	$message.=" for <a href=\"$url?symb=$symb\">$ENV{'form.probTitle'}</a>";
$msgstatus = &Apache::lonmsg::user_normal_msg ($uname,$udom,	$msgstatus = &Apache::lonmsg::user_normal_msg ($uname,$udom,
$ENV{'form.msgsub'},$message);	$ENV{'form.msgsub'},$message);
}	}