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

Diff for /loncom/interface/lonevaluate.pm between versions 1.29 and 1.30

version 1.29, 2009/09/04 16:12:09 version 1.30, 2014/01/17 17:10:12
Line 125  ENDJS Line 125  ENDJS
            );             );
            return OK;             return OK;
         } else {          } else {
             $warning=&mt('Please fill out all fields below.');              $warning=&mt('Please fill out all required fields below!');
         }          }
         
     }      }
Line 173  ENDOPTIONS Line 173  ENDOPTIONS
   
     %lt=&Apache::lonlocal::texthash(      %lt=&Apache::lonlocal::texthash(
        'pleaserank' => 'Please rank the following criteria:',         'pleaserank' => 'Please rank the following criteria:',
          'required'   => '(All fields marked with * are required.)',
        'correct'    => 'The material appears to be correct',         'correct'    => 'The material appears to be correct',
        'helpful'    => 'The material is helpful',         'helpful'    => 'The material is helpful',
        'depth'      => 'The material is covered with sufficient depth',         'depth'      => 'The material is covered with sufficient depth',
Line 183  ENDOPTIONS Line 184  ENDOPTIONS
     );      );
     $r->print(      $r->print(
         $start_page          $start_page
        .'<h2>'.$title.'</h2>'         .'<h2>'.$title.'</h2>');
        .'<p class="LC_warning">'.$warning.'</p>'  
        .'<form method="post" name="evaluation" action="/adm/evaluate">'      if ($warning) {
           $r->print(
               &Apache::loncommon::confirmwrapper(
                   &Apache::lonhtmlcommon::confirm_success(
               $warning,1)));
       }
       $r->print(
           '<form method="post" name="evaluation" action="/adm/evaluate">'
        .'<input type="hidden" name="submiteval" value="true" />'         .'<input type="hidden" name="submiteval" value="true" />'
        .'<input type="hidden" name="postdata" value="'.$showurl.'" />'         .'<input type="hidden" name="postdata" value="'.$showurl.'" />'
     );      );
     $r->print(      $r->print(
         &Apache::lonhtmlcommon::start_pick_box()          &Apache::lonhtmlcommon::start_pick_box()
        .&Apache::lonhtmlcommon::row_headline()         .&Apache::lonhtmlcommon::row_headline()
        .$lt{'pleaserank'}         .$lt{'pleaserank'}.'<br />'
          .'<span class="LC_info">'.$lt{'required'}.'</span>'
        .&Apache::lonhtmlcommon::row_closure()         .&Apache::lonhtmlcommon::row_closure()
     );      );
   
     foreach my $key ('correct', 'helpful', 'depth', 'clear', 'technical') {      foreach my $key ('correct', 'helpful', 'depth', 'clear', 'technical') {
         $r->print(          $r->print(
             &Apache::lonhtmlcommon::row_title($lt{$key})              &Apache::lonhtmlcommon::row_title(
                   '<span title="'.&mt('required').'">'.$lt{$key}
                  .' <span class="LC_info">*</span></span>')
            .'<select name="'.$key.'">'             .'<select name="'.$key.'">'
            .$standardoptions             .$standardoptions
            .'</select>'             .'</select>'
Removed from v.1.29  
changed lines
  Added in v.1.30

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