--- rat/lonratedt.pm 2009/05/20 13:55:40 1.95 +++ rat/lonratedt.pm 2011/11/14 00:20:46 1.104 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Edit Handler for RAT Maps # -# $Id: lonratedt.pm,v 1.95 2009/05/20 13:55:40 bisitz Exp $ +# $Id: lonratedt.pm,v 1.104 2011/11/14 00:20:46 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -43,12 +43,8 @@ use HTML::Entities(); # --------------------------------------------------------- Build up RAT screen sub ratedt { my ($r,$url)=@_; - my %layout = ('border' => "0"); - if ($env{'environment.remote'} eq 'off') { - $layout{'rows'} = "1,250,*"; - } else { - $layout{'rows'} = "1,70,*"; - } + my %layout = ('border' => "0", + 'rows' => "1,250,*"); my $js =' ENDJS + &Apache::lonhtmlcommon::clear_breadcrumbs(); + &Apache::lonhtmlcommon::add_breadcrumb({ + text => 'Construction Space', + href => &Apache::loncommon::authorspace($url), + faq => 6, + bug => 'RAT', + help => 'Sequence_Simple_Editor_Creation',}); + &Apache::lonhtmlcommon::add_breadcrumb({ + text => 'RAT', + title => 'Resource Assembly Tool', + href => '',}); + &Apache::lonhtmlcommon::add_breadcrumb({ + text => 'Editor', + title => 'Simple Editor', + href => '',}); + + # Breadcrumbs are included by &start_page 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)); @@ -582,9 +601,9 @@ value="Select Map" /> +"javascript:impfortarget.value=1;open_Wishlist_Import('simple');" value="$lt{'wl'}" /> +"javascript:impfortarget.value=1;groupopen('$url',1);" value="$lt{'reco'}" /> $lt{'as'}
@@ -626,9 +645,16 @@ ENDSMPHEAD # ----------------------------------------------------------------- No such dir sub nodir { my ($r,$dir)=@_; - $dir=~s{^/home/$LONCAPA::username_re/public_html}{}; - $r->print(&Apache::loncommon::start_page('Construction Space',undef) - .&Apache::lonhtmlcommon::breadcrumbs() # FIXME add breadcrumbs + my $londocroot = $r->dir_config('lonDocRoot'); + my ($path) = ($dir =~ m{^\Q$londocroot\E?(/priv/[^/]+/[^/]+/)}); + $dir=~s{^\Q$londocroot/priv/\E[^/]+/[^/]+}{}; + my $brcrum = [{'href' => &Apache::loncommon::authorspace($path), + 'text' => 'Construction Space'}]; +# {'href' => '', +# 'text' => 'No such directory'}]; + $r->print(&Apache::loncommon::start_page('Construction Space', + undef, + {'bread_crumbs' => $brcrum,}) .&Apache::loncommon::head_subbox( &Apache::loncommon::CSTR_pageheader()) .'

' @@ -642,9 +668,21 @@ sub nodir { sub viewmap { my ($r,$url,$adv,$errtext)=@_; + + &Apache::lonhtmlcommon::clear_breadcrumbs(); + &Apache::lonhtmlcommon::add_breadcrumb({ + text => 'Construction Space', + href => &Apache::loncommon::authorspace($url), + faq => 6, + bug => 'RAT', + help => 'Sequence_Simple_Editor_Creation',}); + &Apache::lonhtmlcommon::add_breadcrumb({ + text => 'RAT', + title => 'Resource Assembly Tool', + href => '',}); + + # Breadcrumbs are included by &start_page $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)) @@ -657,7 +695,7 @@ sub viewmap { ); } my $idx=0; - $r->print('

'.$url.'

'); + $r->print('

'.$url.'

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

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