--- loncom/homework/grades.pm 2002/11/27 15:54:24 1.61
+++ loncom/homework/grades.pm 2002/11/27 16:39:37 1.62
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# The LON-CAPA Grading handler
#
-# $Id: grades.pm,v 1.61 2002/11/27 15:54:24 albertel Exp $
+# $Id: grades.pm,v 1.62 2002/11/27 16:39:37 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -352,7 +352,7 @@ LISTJAVASCRIPT
''."\n".
''."\n".
''."\n".
- '
'."\n".
+ '
'."\n".
'
'."\n".
''."\n".
''."\n".
@@ -672,21 +672,21 @@ sub sub_page_js {
pWin.document.write("
");
pWin.document.write("Subject | ");
pWin.document.write(" | ");
- pWin.document.write(" |
");
+ pWin.document.write(" | ");
}
function displaySavedMsg(ctr,msg,shwsel) {
pWin.document.write("");
pWin.document.write(""+ctr+" | ");
pWin.document.write(" | ");
- pWin.document.write(" |
");
+ pWin.document.write(" | ");
}
function newMsg(newmsg,shwsel) {
pWin.document.write("");
pWin.document.write("New | ");
pWin.document.write(" | ");
- pWin.document.write(" |
");
+ pWin.document.write(" | ");
}
function msgTail() {
@@ -1226,7 +1226,7 @@ sub processHandGrade {
my $includemsg = $ENV{'form.includemsg'.$ctr};
my ($subject,$message,$msgstatus) = ('','','');
- if ($includemsg =~ /savemsg|new$ctr/) {
+ if ($includemsg =~ /savemsg|newmsg\Q$ctr\E/) {
$subject = $ENV{'form.msgsub'} if ($includemsg =~ /^msgsub/);
my (@msgnum) = split(/,/,$includemsg);
foreach (@msgnum) {