--- loncom/interface/lonpickcode.pm 2005/12/20 18:54:54 1.8 +++ loncom/interface/lonpickcode.pm 2006/03/15 22:11:04 1.9 @@ -1,7 +1,7 @@ # The LearningOnline Network # Pick a CODE from the list of possible CODEs # -# $Id: lonpickcode.pm,v 1.8 2005/12/20 18:54:54 albertel Exp $ +# $Id: lonpickcode.pm,v 1.9 2006/03/15 22:11:04 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -60,13 +60,6 @@ sub handler { &Apache::loncommon::content_type($r,'text/html'); $r->send_http_header; return OK if $r->header_only; - my $html=&Apache::lonxml::xmlbegin(); - $r->print(< - The LearningOnline Network with CAPA - -ENDDOCUMENT &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'}, ['curCODE','scantron_selectfile', @@ -75,7 +68,9 @@ ENDDOCUMENT if (!($env{'request.course.id'}) && (&Apache::lonnet::allowed('usc',$env{'request.course.id'}))) { - $r->print('Access not allowed.'); + $r->print(&Apache::loncommon::start_page(). + &mt('Access not allowed.'). + &Apache::loncommon::end_page()); return OK; } if ($env{'form.command'} eq 'codelist') { @@ -85,14 +80,14 @@ ENDDOCUMENT } else { &picking_a_code($r); } - $r->print(''); + $r->print(&Apache::loncommon::end_page()); return OK; } sub code_list { my ($r,$secondview)=@_; if (!$secondview) { - $r->print(&Apache::loncommon::bodytag("View CODEs")); + $r->print(&Apache::loncommon::start_page("View CODEs")); $r->print("

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

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

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

"); @@ -110,7 +105,7 @@ sub code_list { sub show_codes { my ($r)=@_; - $r->print(&Apache::loncommon::bodytag("View CODEs")); + $r->print(&Apache::loncommon::start_page("View CODEs")); my %codes=&Apache::grades::get_codes(); $r->print("

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

"); $r->print('
');
@@ -123,7 +118,7 @@ sub show_codes {
 
 sub picking_a_code {
     my ($r)=@_;
-    $r->print(&Apache::loncommon::bodytag("Selecting a CODE"));
+    $r->print(&Apache::loncommon::start_page("Selecting a CODE"));
     $r->print(<
 function gochoose(newcode) {