--- rat/lonratedt.pm 2009/08/14 02:16:31 1.94.2.1 +++ rat/lonratedt.pm 2009/05/20 13:55:40 1.95 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Edit Handler for RAT Maps # -# $Id: lonratedt.pm,v 1.94.2.1 2009/08/14 02:16:31 raeburn Exp $ +# $Id: lonratedt.pm,v 1.95 2009/05/20 13:55:40 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -58,6 +58,7 @@ sub ratedt { &Apache::loncommon::start_page('Edit Sequence',$js, {'frameset' => 1, 'add_entries' => \%layout}); + my $end_page = &Apache::loncommon::end_page({'frameset' => 1}); @@ -87,7 +88,7 @@ sub buttons { $output.=''. &Apache::loncommon::help_open_topic('Sequence_Advanced_Editor_Creation'); } - return $output.'
'; + return $output.''; } # ----------------------------------------------------------------- Edit script @@ -214,7 +215,6 @@ ENDSCRIPT sub smpedt { my ($r,$url,$errtext)=@_; - my $buttons=&buttons(2); my $tmpfn=&Apache::lonnet::filelocation('',$url).'.tmp'; my $targetmsg=''; if ($env{'form.save'}) { @@ -540,15 +540,18 @@ sub smpedt { ENDJS - my $start_page = &Apache::loncommon::start_page(undef,$js). - &Apache::loncommon::help_open_menu('Sequence_Simple_Editor_Creation', - 'Sequence_Simple_Editor_Creation', - 6,'RAT'); + my $start_page = &Apache::loncommon::start_page('Construction Space',$js) + .&Apache::lonhtmlcommon::breadcrumbs(# FIXME add breadcrumbs + &Apache::loncommon::help_open_menu('Sequence_Simple_Editor_Creation', + 'Sequence_Simple_Editor_Creation', + 6,'RAT')) + .&Apache::loncommon::head_subbox( + &Apache::loncommon::CSTR_pageheader() + .&buttons(2)); my $end_page = &Apache::loncommon::end_page(); $r->print(<$errtext
@@ -624,23 +627,28 @@ ENDSMPHEAD sub nodir { my ($r,$dir)=@_; $dir=~s{^/home/$LONCAPA::username_re/public_html}{}; - $r->print(&Apache::loncommon::start_page(undef,undef, - {'only_body' => 1, - 'bgcolor' => '#FFFFFF',}). - '

'. - &mt('No such directory: [_1]',''.$dir.''). - '

'. - &Apache::loncommon::end_page()); + $r->print(&Apache::loncommon::start_page('Construction Space',undef) + .&Apache::lonhtmlcommon::breadcrumbs() # FIXME add breadcrumbs + .&Apache::loncommon::head_subbox( + &Apache::loncommon::CSTR_pageheader()) + .'

' + .&mt('No such directory: [_1]',''.$dir.'' + .'

' + .&Apache::loncommon::end_page()) + ); } # ---------------------------------------------------------------- View Handler sub viewmap { my ($r,$url,$adv,$errtext)=@_; - $r->print( - &Apache::loncommon::start_page('Edit Content of a Map'). - &Apache::loncommon::help_open_menu('','',6,'RAT'). - &buttons($adv)); + $r->print(&Apache::loncommon::start_page('Edit Content of a Map') + .&Apache::lonhtmlcommon::breadcrumbs(# FIXME add breadcrumbs + &Apache::loncommon::help_open_menu('','',6,'RAT')) # FIXME help broken? + .&Apache::loncommon::head_subbox( + &Apache::loncommon::CSTR_pageheader() + .&buttons($adv)) + ); if ($errtext) { $r->print('
' .$errtext @@ -649,7 +657,7 @@ sub viewmap { ); } my $idx=0; - $r->print('

'.$url.'

'); + $r->print('

'.$url.'

'); if ($adv) { $r->print('

' .&mt('Map contents are not shown in order.')