Diff for /loncom/homework/templates/DropBox.problem between versions 1.17 and 1.18

version 1.17, 2011/05/01 17:17:09 version 1.18, 2011/05/21 14:50:40
Line 5 Line 5
 <parameter name="maxfilesize" id="13" default="10.0" type="float_pos" description="Max. cumulative size (MB) for submitted file(s)" />   <parameter name="maxfilesize" id="13" default="10.0" type="float_pos" description="Max. cumulative size (MB) for submitted file(s)" /> 
   
 <script type="loncapa/perl">  <script type="loncapa/perl">
 $weight=&EXT('resource.0.weight');  $weight=&parameter_setting('weight');
 if ((!defined($weight)) || ($weight eq '')) { $weight=1; }  if ((!defined($weight)) || ($weight eq '')) { $weight=1; }
 $awarded=&EXT('user.resource.resource.0.awarded');  $awarded=&stored_data('awarded');
 $scoreformat=&EXT('resource.0.scoreformat');  $scoreformat=&parameter_setting('scoreformat');
 if (!defined($scoreformat) || $scoreformat eq '') { $scoreformat="2f"; }  if (!defined($scoreformat) || $scoreformat eq '') { $scoreformat="2f"; }
 $display='';  $display='';
 if (&EXT('resource.0.problemstatus')!~/^no/) {  if (&parameter_setting('problemstatus')!~/^no/) {
    if (!defined($awarded)) {     if (!defined($awarded)) {
       $display=$weight.' possible points.';        $display=$weight.' possible points.';
    } else {     } else {
Line 19  if (&EXT('resource.0.problemstatus')!~/^ Line 19  if (&EXT('resource.0.problemstatus')!~/^
             $weight.' possible points.';              $weight.' possible points.';
    }     }
 }  }
 $comment=&EXT('user.resource.resource.0.comment');  $comment=&stored_data('comment');
 if (!defined($comment) || $comment!~/\w/) {  if (!defined($comment) || $comment!~/\w/) {
    $comment='';     $comment='';
 } else {  } else {
    $comment='<br /><table><tr><td bgcolor="#FFFFDD">'.$comment.'</td></tr></table>';     $comment='<br /><table><tr><td bgcolor="#FFFFDD">'.$comment.'</td></tr></table>';
 }  }
 $gradeinfo=&EXT('user.resource.resource.0.gradeinfo');  $gradeinfo=&stored_data('gradeinfo');
 if (!defined($gradeinfo) || $gradeinfo!~/\w/) {  if (!defined($gradeinfo) || $gradeinfo!~/\w/) {
    $gradeinfo='';     $gradeinfo='';
 } else {  } else {

Removed from v.1.17  
changed lines
  Added in v.1.18


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>