--- loncom/interface/lonpickcode.pm 2007/10/12 20:08:38 1.13 +++ loncom/interface/lonpickcode.pm 2007/11/13 01:14:11 1.14 @@ -1,7 +1,7 @@ # The LearningOnline Network # Pick a CODE from the list of possible CODEs # -# $Id: lonpickcode.pm,v 1.13 2007/10/12 20:08:38 banghart Exp $ +# $Id: lonpickcode.pm,v 1.14 2007/11/13 01:14:11 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -106,23 +106,21 @@ sub code_list { } elsif ($context eq 2) { $table_head = (''.&mt('Select a set of saved CODEs to view.').""); } - $r->print("
"); + $r->print(""); $r->print($enc_table_start); $r->print(''); $r->print(''); $r->print(''); + $r->print('
'); $r->print($table_head); $r->print('
'); + $r->print(" "); $r->print(&Apache::grades::scantron_CODElist()); $r->print('
'); + $r->print($enc_table_close); # conditional $r->print(""); $r->print(""); $r->print(""); - $r->print(''); - $r->print(""); - $r->print(''); - $r->print(''); - $r->print($enc_table_close); # conditional $r->print("
"); }