[prev in list] [next in list] [prev in thread] [next in thread] 

List:       lon-capa-cvs
Subject:    [LON-CAPA-cvs] cvs: loncom /homework grades.pm
From:       www <lon-capa-cvs () mail ! lon-capa ! org>
Date:       2003-11-25 21:54:59
Message-ID: cvswww1069797299 () cvsserver
[Download RAW message or body]

www		Tue Nov 25 16:54:59 2003 EDT

  Modified files:              
    /loncom/homework	grades.pm 
  Log:
  Have been asked to have student uploaded text-like files appear in a separate
  window.
  
  
Index: loncom/homework/grades.pm
diff -u loncom/homework/grades.pm:1.162 loncom/homework/grades.pm:1.163
--- loncom/homework/grades.pm:1.162	Tue Nov 25 16:44:45 2003
+++ loncom/homework/grades.pm	Tue Nov 25 16:54:58 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Grading handler
 #
-# $Id: grades.pm,v 1.162 2003/11/25 21:44:45 albertel Exp $
+# $Id: grades.pm,v 1.163 2003/11/25 21:54:58 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1644,7 +1644,7 @@
 			    $partid.'</b> <font color="#999999">( ID '.$respid.
 			    ' )</font>&nbsp; &nbsp;';
 			if ($record{"resource.$partid.$respid.uploadedurl"}) {
-			    $lastsubonly.='<a \
href="'.&Apache::lonnet::tokenwrapper($record{"resource.$partid.$respid.uploadedurl"}).'"><img \
src="/adm/lonIcons/unknown.gif" border=0"> File uploaded by student</a> <font \
color="red" size="1">Like all files provided by users, this file may contain \
virusses</font><br />'; +			    $lastsubonly.='<a \
href="'.&Apache::lonnet::tokenwrapper($record{"resource.$partid.$respid.uploadedurl"}).'" \
target="lonGRDs"><img src="/adm/lonIcons/unknown.gif" border=0"> File uploaded by \
student</a> <font color="red" size="1">Like all files provided by users, this file \
may contain virusses</font><br />';  }
 			$lastsubonly.='<b>Submitted Answer: </b>'.
 			    &cleanRecord($subval,$responsetype,$symb,$partid,


[prev in list] [next in list] [prev in thread] [next in thread]