[LON-CAPA-cvs] cvs: loncom /interface loncoursegroups.pm

albertel lon-capa-cvs@mail.lon-capa.org
Sun, 19 Mar 2006 22:31:43 -0000 

albertel		Sun Mar 19 17:31:43 2006 EDT

  Modified files:              
    /loncom/interface	loncoursegroups.pm 
  Log:
  - start_page
  
  
Index: loncom/interface/loncoursegroups.pm
diff -u loncom/interface/loncoursegroups.pm:1.8 loncom/interface/loncoursegroups.pm:1.9
--- loncom/interface/loncoursegroups.pm:1.8	Thu Feb 23 12:23:09 2006
+++ loncom/interface/loncoursegroups.pm	Sun Mar 19 17:31:41 2006
@@ -102,8 +102,7 @@
 sub print_main_menu {
     my ($r,$cdom,$cnum,$function,$tabcol,$functions,$idx,$view_permission,
         $manage_permission,$action,$rowColor1,$rowColor2) = @_;
-    $r->print(&header('Course Groups',&mt('LON-CAPA Course Groups'),
-              undef,undef,undef,undef,$function));
+    $r->print(&header('Course Groups',undef,undef,undef,undef,$function));
     &Apache::lonhtmlcommon::add_breadcrumb
         ({href=>"/adm/coursegroups",
           text=>"Course Groups",});
@@ -721,8 +720,8 @@
     }
 
     my $loaditems =  &onload_action($action,$state);
-    $r->print(&header('Course Groups Manager',&mt('LON-CAPA Groups Manager'),
-                          $jscript,$action,$state,$page,$function,$loaditems));
+    $r->print(&header('Course Groups Manager',
+		      $jscript,$action,$state,$page,$function,$loaditems));
 
     if ($env{'form.refpage'} eq 'enrl') {
         &Apache::lonhtmlcommon::add_breadcrumb
@@ -951,19 +950,14 @@
 }
 
 sub header {
-    my ($bodytitle,$title,$jscript,$action,$state,$page,$function,$loaditems) = @_;
-    my $html=&Apache::lonxml::xmlbegin();
-    my $bodytag=&Apache::loncommon::bodytag($bodytitle,$function,$loaditems);
+    my ($bodytitle,$jscript,$action,$state,$page,$function,$loaditems) = @_;
+    my $start_page=
+	&Apache::loncommon::start_page($bodytitle,$jscript,
+				       {'function' => $function,
+					'add_entries' => $loaditems,});
     my $output = <<"END";
-$html
-<head>
-<title>$title</title>
-<script type="text/javascript">
-$jscript
-</script>
-</head>
 $bodytag
-<form method="post" name="$state">
+<form method="POST" name="$state">
 
 END
     if ($action eq 'create' || $action eq 'modify') {
@@ -999,11 +993,11 @@
 }
 
 sub footer {
+    my $end_page = &Apache::loncommon::end_page();
        return(<<ENDFOOT);
    <input type="hidden" name="sortby" value="$env{'form.sortby'}" />
   </form>
- </body>
-</html>
+$end_page
 ENDFOOT
 }