[BACK]Return to grades.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / homework

Diff for /loncom/homework/grades.pm between versions 1.596.2.12.2.39 and 1.596.2.12.2.40.2.1

version 1.596.2.12.2.39, 2017/05/19 16:48:56 version 1.596.2.12.2.40.2.1, 2018/10/09 15:45:43
Line 44  use Apache::Constants qw(:common :http); Line 44  use Apache::Constants qw(:common :http);
 use Apache::lonlocal;  use Apache::lonlocal;
 use Apache::lonenc;  use Apache::lonenc;
 use Apache::bridgetask();  use Apache::bridgetask();
   use Apache::lontexconvert();
 use String::Similarity;  use String::Similarity;
 use LONCAPA;  use LONCAPA;
   
Line 465  sub cleanRecord { Line 466  sub cleanRecord {
     $env{'form.kwstyle'}  = $keyhash{$loginuser.'_kwstyle'} ne '' ? $keyhash{$loginuser.'_kwstyle'} : '';      $env{'form.kwstyle'}  = $keyhash{$loginuser.'_kwstyle'} ne '' ? $keyhash{$loginuser.'_kwstyle'} : '';
     $env{'form.'.$symb} = 1; # so that we don't have to read it from disk for multiple sub of the same prob.      $env{'form.'.$symb} = 1; # so that we don't have to read it from disk for multiple sub of the same prob.
  }   }
           $answer = &Apache::lontexconvert::msgtexconverted($answer);
  return '<br /><br /><blockquote><tt>'.&keywords_highlight($answer).'</tt></blockquote>';   return '<br /><br /><blockquote><tt>'.&keywords_highlight($answer).'</tt></blockquote>';
     } elsif ( $response eq 'organic') {      } elsif ( $response eq 'organic') {
         my $result=&mt('Smile representation: [_1]',          my $result=&mt('Smile representation: [_1]',
Line 10008  sub substatus_options { Line 10010  sub substatus_options {
                                       'queued'    => 'in grading queue',                                        'queued'    => 'in grading queue',
                                       'graded'    => 'with ungraded submissions',                                        'graded'    => 'with ungraded submissions',
                                       'incorrect' => 'with incorrect submissions',                                        'incorrect' => 'with incorrect submissions',
                                       'all'       => 'with any status');                                        'all'       => 'with any status',
                                         );
 }  }
   
 sub reset_perm {  sub reset_perm {
Removed from v.1.596.2.12.2.39  
changed lines
  Added in v.1.596.2.12.2.40.2.1

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