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

Diff for /loncom/homework/inputtags.pm between versions 1.321 and 1.323

version 1.321, 2013/08/29 12:47:30 version 1.323, 2014/01/13 15:29:10
Line 222  sub start_textfield { Line 222  sub start_textfield {
                 $oldresponse = $Apache::lonhomework::history{"resource.$partid.$resid.submission"};                  $oldresponse = $Apache::lonhomework::history{"resource.$partid.$resid.submission"};
             } elsif (($Apache::lonhomework::history{"resource.$partid.type"} eq 'anonsurvey') ||              } elsif (($Apache::lonhomework::history{"resource.$partid.type"} eq 'anonsurvey') ||
                     ($Apache::lonhomework::history{"resource.$partid.type"} eq 'anonsurveycred')) {                      ($Apache::lonhomework::history{"resource.$partid.type"} eq 'anonsurveycred')) {
                 $oldresponse = '* '.&mt('only shown to submitter').' *';                  $oldresponse = '* '.&mt('(only shown to submitter)').' *';
             } else {              } else {
                 $oldresponse = $Apache::lonhomework::history{"resource.$partid.$resid.submission"};                  $oldresponse = $Apache::lonhomework::history{"resource.$partid.$resid.submission"};
             }              }
Line 254  sub start_textfield { Line 254  sub start_textfield {
  && &Apache::londefdef::is_inside_of($tagstack,   && &Apache::londefdef::is_inside_of($tagstack,
     'essayresponse') ) {      'essayresponse') ) {
  $result='<table class="LC_pastsubmission"><tr><td>'.   $result='<table class="LC_pastsubmission"><tr><td>'.
     $oldresponse.'</td></tr></table>';      &HTML::Entities::encode($oldresponse,'"<>&').
                       '</td></tr></table>';
     }      }
     #get rid of any startup text      #get rid of any startup text
     &Apache::lonxml::get_all_text("/textfield",$parser,$style);      &Apache::lonxml::get_all_text("/textfield",$parser,$style);
Line 424  sub start_textline { Line 425  sub start_textline {
                         ($Apache::lonhomework::history{"resource.$partid.type"} eq 'anonsurveycred') ||                          ($Apache::lonhomework::history{"resource.$partid.type"} eq 'anonsurveycred') ||
                         ($Apache::lonhomework::type eq 'anonsurvey') ||                          ($Apache::lonhomework::type eq 'anonsurvey') ||
                         ($Apache::lonhomework::type eq 'anonsurveycred')) {                          ($Apache::lonhomework::type eq 'anonsurveycred')) {
                         $oldresponse = '* '.&mt('only shown to submitter').' *';                          $oldresponse = '* '.&mt('(only shown to submitter)').' *';
                 } else {                  } else {
                     $oldresponse = $Apache::lonhomework::history{"resource.$partid.$id.submission"};                      $oldresponse = $Apache::lonhomework::history{"resource.$partid.$id.submission"};
                 }                  }
Removed from v.1.321  
changed lines
  Added in v.1.323

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