--- rat/lonratedt.pm 2011/10/31 01:23:26 1.103 +++ rat/lonratedt.pm 2012/05/15 01:41:42 1.106 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Edit Handler for RAT Maps # -# $Id: lonratedt.pm,v 1.103 2011/10/31 01:23:26 raeburn Exp $ +# $Id: lonratedt.pm,v 1.106 2012/05/15 01:41:42 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -491,7 +491,7 @@ sub smpedt { 'nt' => 'New Title', 'se' => 'Search', 'im' => 'Import', - 'wl' => 'Import from Wishlist', + 'wl' => 'Import from Stored Links', 'vi' => 'View', 'lm' => 'Load Map', 'ds' => 'Discard Selected', @@ -549,7 +549,7 @@ ENDJS &Apache::lonhtmlcommon::clear_breadcrumbs(); &Apache::lonhtmlcommon::add_breadcrumb({ text => 'Construction Space', - href => &Apache::loncommon::authorspace(), + href => &Apache::loncommon::authorspace($url), faq => 6, bug => 'RAT', help => 'Sequence_Simple_Editor_Creation',}); @@ -601,7 +601,7 @@ value="Select Map" /> +"javascript:impfortarget.value=1;open_StoredLinks_Import('simple');" value="$lt{'wl'}" /> $lt{'as'} @@ -646,8 +646,9 @@ ENDSMPHEAD sub nodir { my ($r,$dir)=@_; 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(), + my $brcrum = [{'href' => &Apache::loncommon::authorspace($path), 'text' => 'Construction Space'}]; # {'href' => '', # 'text' => 'No such directory'}]; @@ -671,7 +672,7 @@ sub viewmap { &Apache::lonhtmlcommon::clear_breadcrumbs(); &Apache::lonhtmlcommon::add_breadcrumb({ text => 'Construction Space', - href => &Apache::loncommon::authorspace(), + href => &Apache::loncommon::authorspace($url), faq => 6, bug => 'RAT', help => 'Sequence_Simple_Editor_Creation',}); @@ -726,7 +727,7 @@ sub viewmap { $filename = $1; } my $cstrurl = $resurl; - $cstrurl =~ s#^/res/[^/]+/([^/]+)/#/priv/$1/#; + $cstrurl =~ s{^/res/}{/priv/}; $r->print(&Apache::loncommon::start_data_table_row() .'