Diff for /loncom/interface/lonpickcode.pm between versions 1.13 and 1.14

version 1.13, 2007/10/12 20:08:38 version 1.14, 2007/11/13 01:14:11
Line 106  sub code_list { Line 106  sub code_list {
     } elsif ($context eq 2) {      } elsif ($context eq 2) {
         $table_head = ('<b>'.&mt('Select a set of saved CODEs to view.')."</b>");          $table_head = ('<b>'.&mt('Select a set of saved CODEs to view.')."</b>");
     }      }
     $r->print("<form method='POST' action='/adm/pickcode' name='pickcode'>");      $r->print("<form method='post' action='/adm/pickcode' name='pickcode'>");
     $r->print($enc_table_start);      $r->print($enc_table_start);
     $r->print('<table width="100%">');      $r->print('<table width="100%">');
     $r->print('<tr><td bgcolor="#e6ffff">');      $r->print('<tr><td bgcolor="#e6ffff">');
     $r->print($table_head);      $r->print($table_head);
     $r->print('</td></tr>');      $r->print('</td></tr>');
     $r->print('<tr><td bgcolor="#ffffe6">');      $r->print('<tr><td bgcolor="#ffffe6">');
       $r->print("<input type='submit' name='submit' value='".&mt("View:")."' /> ");
     $r->print(&Apache::grades::scantron_CODElist());      $r->print(&Apache::grades::scantron_CODElist());
     $r->print('</td></tr>');      $r->print('</td></tr>');
       $r->print('</table>');
       $r->print($enc_table_close); # conditional
     $r->print("<input type='hidden' name='command' value='showcodes' />");      $r->print("<input type='hidden' name='command' value='showcodes' />");
     $r->print("<input type='hidden' name='symb' value='".$env{'form.symb'}."' />");      $r->print("<input type='hidden' name='symb' value='".$env{'form.symb'}."' />");
     $r->print("<input type='hidden' name='url' value='".$env{'form.url'}."' />");      $r->print("<input type='hidden' name='url' value='".$env{'form.url'}."' />");
     $r->print('<tr><td bgcolor="#ffffe6">');  
     $r->print("<input type='submit' name='submit' value='".&mt("View")."' />");  
     $r->print('</td></tr>');  
     $r->print('</table>');  
     $r->print($enc_table_close); # conditional  
     $r->print("</form>");      $r->print("</form>");
           
 }  }

Removed from v.1.13  
changed lines
  Added in v.1.14


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