[BACK]Return to lonratmenu.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / rat

Diff for /rat/lonratmenu.pm between versions 1.9 and 1.12

version 1.9, 2008/03/03 16:41:49 version 1.12, 2009/05/20 15:34:27
Line 2 Line 2
 # Build menu bar for Advanced RAT. Uses javascript code originally in  # Build menu bar for Advanced RAT. Uses javascript code originally in
 # static file: rat/client/code.html, now in  rat/client/ratcode.js    # static file: rat/client/code.html, now in  rat/client/ratcode.js  
 #  #
   # $Id$
   #
 # Copyright Michigan State University Board of Trustees  # Copyright Michigan State University Board of Trustees
 #  #
 # This file is part of the LearningOnline Network with CAPA (LON-CAPA).  # This file is part of the LearningOnline Network with CAPA (LON-CAPA).
Line 39  sub handler { Line 41  sub handler {
     $r->send_http_header('text/html');      $r->send_http_header('text/html');
     my $js = join('',<$jsh>);      my $js = join('',<$jsh>);
     my %loaditem = ('onunload' => "leave();",);      my %loaditem = ('onunload' => "leave();",);
     my $start_page =       $r->print(&Apache::loncommon::start_page('Advanced Editor',$js,
  &Apache::loncommon::start_page('Advanced Editor',$js,                    {'add_entries' => \%loaditem, 'suppress_header_logos' => 1})
        {'add_entries' => \%loaditem, 'suppress_header_logos' => 1});               .&Apache::lonhtmlcommon::breadcrumbs() # FIXME add breadcrumbs
     $r->print($start_page);               .&Apache::loncommon::head_subbox(
                     &Apache::loncommon::CSTR_pageheader())
       );
     my $readfile=$r->uri;      my $readfile=$r->uri;
     $readfile=~s/\/loadonly\/adveditmenu$//;      $readfile=~s/\/loadonly\/adveditmenu$//;
     $r->print(&print_html($readfile));      $r->print(&print_html($readfile));
Line 55  sub print_html { Line 59  sub print_html {
     my $help=&Apache::loncommon::help_open_menu('Sequence_Advanced_Editor_Creation','Sequence_Advanced_Editor_Creation',6,'RAT');      my $help=&Apache::loncommon::help_open_menu('Sequence_Advanced_Editor_Creation','Sequence_Advanced_Editor_Creation',6,'RAT');
   
     my $pagetext = <<"END";      my $pagetext = <<"END";
 <table border=0><tr><td bgcolor="#aaaaaa">  <table border="0"><tr><td bgcolor="#AAAAAA">
 <table border=0><tr>  <table border="0"><tr>
 <td bgcolor="#ffffcc">$help</td>  <td bgcolor="#ffffcc">$help</td>
 <td bgcolor="#ffffcc"><a href="javascript:togglemode();"><font size="-2">Toggle display</font></a></td>  <td bgcolor="#ffffcc"><a href="javascript:togglemode();"><font size="-2">Toggle display</font></a></td>
 <td bgcolor="#ffffcc"><a href="javascript:if (zscale>1) { zscale--; draw();}"><font size="-2">Zoom out</font></a></td>  <td bgcolor="#ffffcc"><a href="javascript:if (zscale>1) { zscale--; draw();}"><font size="-2">Zoom out</font></a></td>
Removed from v.1.9  
changed lines
  Added in v.1.12

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>