--- loncom/interface/lonpickcode.pm 2006/03/15 22:11:04 1.9 +++ loncom/interface/lonpickcode.pm 2007/01/25 20:34:29 1.12 @@ -1,7 +1,7 @@ # The LearningOnline Network # Pick a CODE from the list of possible CODEs # -# $Id: lonpickcode.pm,v 1.9 2006/03/15 22:11:04 albertel Exp $ +# $Id: lonpickcode.pm,v 1.12 2007/01/25 20:34:29 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -87,7 +87,8 @@ sub handler { sub code_list { my ($r,$secondview)=@_; if (!$secondview) { - $r->print(&Apache::loncommon::start_page("View CODEs")); + $r->print(&Apache::loncommon::start_page("View CODEs",undef, + {'no_nav_bar' => 1})); $r->print("

".&mt('Select a set of saved CODEs to view.')."

"); } else { $r->print("

".&mt('Select another set of saved CODEs to view.')."

"); @@ -105,7 +106,8 @@ sub code_list { sub show_codes { my ($r)=@_; - $r->print(&Apache::loncommon::start_page("View CODEs")); + $r->print(&Apache::loncommon::start_page("View CODEs",undef, + {'no_nav_bar' => 1})); my %codes=&Apache::grades::get_codes(); $r->print("

".$env{'form.scantron_CODElist'}."

"); $r->print('
');
@@ -118,7 +120,8 @@ sub show_codes {
 
 sub picking_a_code {
     my ($r)=@_;
-    $r->print(&Apache::loncommon::start_page("Selecting a CODE"));
+    $r->print(&Apache::loncommon::start_page("Selecting a CODE",undef,
+					     {'no_nav_bar' => 1}));
     $r->print(<
 function gochoose(newcode) {
@@ -140,7 +143,7 @@ ENDSCRIPT
     my %code_freq=&get_code_freq($r);
     my $num_matches=length($env{'form.curCODE'});
     for (my $i=$num_matches;$i>=0;$i--) {
-	my $to_print="

CODEs with $i matches

"; + my $to_print="

".&mt("CODEs with [_1] matching letters",$i)."

"; $to_print.=''; my $print; foreach my $code (sort(keys(%codes))) {
CODEexams using this CODE