[LON-CAPA-cvs] cvs: rat / lonratmenu.pm

bisitz bisitz@source.lon-capa.org
Wed, 20 May 2009 15:34:27 -0000


bisitz		Wed May 20 15:34:27 2009 EDT

  Modified files:              
    /rat	lonratmenu.pm 
  Log:
  Changes related to modification of LON-CAPA screen header.
  start_page call - RAT Advanced Edit:
  - Added breadcrumbs (only basic call)
  - Added head_subbox and included CSTR standard header
  
  
Index: rat/lonratmenu.pm
diff -u rat/lonratmenu.pm:1.11 rat/lonratmenu.pm:1.12
--- rat/lonratmenu.pm:1.11	Thu Apr 23 17:31:25 2009
+++ rat/lonratmenu.pm	Wed May 20 15:34:27 2009
@@ -2,7 +2,7 @@
 # Build menu bar for Advanced RAT. Uses javascript code originally in
 # static file: rat/client/code.html, now in  rat/client/ratcode.js  
 #
-# $Id: lonratmenu.pm,v 1.11 2009/04/23 17:31:25 bisitz Exp $
+# $Id: lonratmenu.pm,v 1.12 2009/05/20 15:34:27 bisitz Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -41,10 +41,12 @@
     $r->send_http_header('text/html');
     my $js = join('',<$jsh>);
     my %loaditem = ('onunload' => "leave();",);
-    my $start_page = 
-	&Apache::loncommon::start_page('Advanced Editor',$js,
-				       {'add_entries' => \%loaditem, 'suppress_header_logos' => 1});
-    $r->print($start_page);
+    $r->print(&Apache::loncommon::start_page('Advanced Editor',$js,
+                  {'add_entries' => \%loaditem, 'suppress_header_logos' => 1})
+             .&Apache::lonhtmlcommon::breadcrumbs() # FIXME add breadcrumbs
+             .&Apache::loncommon::head_subbox(
+                  &Apache::loncommon::CSTR_pageheader())
+    );
     my $readfile=$r->uri;
     $readfile=~s/\/loadonly\/adveditmenu$//;
     $r->print(&print_html($readfile));