version 1.358.2.19.2.1, 2021/12/31 20:56:46
|
version 1.358.2.19.2.3, 2022/07/08 16:04:35
|
Line 78 sub java_not_enabled {
|
Line 78 sub java_not_enabled {
|
sub coursepreflink { |
sub coursepreflink { |
my ($text,$category)=@_; |
my ($text,$category)=@_; |
if (&Apache::lonnet::allowed('opa',$env{'request.course.id'})) { |
if (&Apache::lonnet::allowed('opa',$env{'request.course.id'})) { |
return '<a target="_top" href="'.&HTML::Entities::encode("/adm/courseprefs?phase=display&actions=$category",'<>&"').'"><span class="LC_setting">'.$text.'</span></a>'; |
my $target =' target="_top"'; |
|
if (($env{'request.deeplink.login'}) && ($env{'request.deeplink.target'} eq '_self')) { |
|
$target = ''; |
|
} |
|
return '<a'.$target.' href="'.&HTML::Entities::encode("/adm/courseprefs?phase=display&actions=$category",'<>&"').'"><span class="LC_setting">'.$text.'</span></a>'; |
} else { |
} else { |
return ''; |
return ''; |
} |
} |
Line 101 sub direct_parm_link {
|
Line 105 sub direct_parm_link {
|
$filter=&entity_encode($filter); |
$filter=&entity_encode($filter); |
$part=&entity_encode($part); |
$part=&entity_encode($part); |
if (($symb) && (&Apache::lonnet::allowed('opa')) && ($target ne 'tex')) { |
if (($symb) && (&Apache::lonnet::allowed('opa')) && ($target ne 'tex')) { |
return "<a target='_top' href='/adm/parmset?symb=$symb&filter=$filter&part=$part'><span class='LC_setting'>$linktext</span></a>"; |
my $target=' target="_top"'; |
|
if (($env{'request.deeplink.login'}) && ($env{'request.deeplink.target'} eq '_self')) { |
|
$target = ''; |
|
} |
|
return "<a".$target." href='/adm/parmset?symb=$symb&filter=$filter&part=$part'><span class='LC_setting'>$linktext</span></a>"; |
} else { |
} else { |
return $linktext; |
return $linktext; |
} |
} |
Line 1781 Inputs: $component (the text on the righ
|
Line 1789 Inputs: $component (the text on the righ
|
row, using loncommon::help_open_topic() to generate the link. |
row, using loncommon::help_open_topic() to generate the link. |
$topic_help_text (text to include in the link in the optional help item |
$topic_help_text (text to include in the link in the optional help item |
on the right side of the breadcrumbs row. |
on the right side of the breadcrumbs row. |
|
$links_target optionally includes the target (_top, _parent or _self) |
|
|
Returns a string containing breadcrumbs for the current page. |
Returns a string containing breadcrumbs for the current page. |
|
|
Line 1809 returns: nothing
|
Line 1818 returns: nothing
|
|
|
sub breadcrumbs { |
sub breadcrumbs { |
my ($component,$component_help,$menulink,$helplink,$css_class,$no_mt, |
my ($component,$component_help,$menulink,$helplink,$css_class,$no_mt, |
$CourseBreadcrumbs,$topic_help,$topic_help_text) = @_; |
$CourseBreadcrumbs,$topic_help,$topic_help_text,$links_target) = @_; |
# |
# |
$css_class ||= 'LC_breadcrumbs'; |
$css_class ||= 'LC_breadcrumbs'; |
|
|
Line 1852 returns: nothing
|
Line 1861 returns: nothing
|
} |
} |
} |
} |
} |
} |
|
my $target = '_top'; |
|
if ($links_target) { |
|
$target = $links_target; |
|
} elsif (($env{'request.deeplink.login'}) && ($env{'request.deeplink.target'} eq '_self')) { |
|
$target = ''; |
|
} |
$menulink = { href =>'/adm/menu', |
$menulink = { href =>'/adm/menu', |
title =>'Go to main menu', |
title =>'Go to main menu', |
target =>'_top', |
target =>$target, |
text =>$description, |
text =>$description, |
no_mt =>$no_mt_descr, }; |
no_mt =>$no_mt_descr, }; |
if($last) { |
if($last) { |
Line 1872 returns: nothing
|
Line 1887 returns: nothing
|
title => &mt('Back to most recent content resource'), |
title => &mt('Back to most recent content resource'), |
class => 'LC_menubuttons_link', |
class => 'LC_menubuttons_link', |
}; |
}; |
if ($env{'request.noversionuri'} eq '/adm/searchcat') { |
if ($links_target) { |
$hashref->{'target'} = '_top'; |
$hashref->{'target'} = $links_target; |
} |
} |
$links=&htmltag( 'a','<img src="/res/adm/pages/tolastloc.png" alt="'.$alttext.'" class="LC_icon" />', |
$links=&htmltag( 'a','<img src="/res/adm/pages/tolastloc.png" alt="'.$alttext.'" class="LC_icon" />', |
$hashref); |
$hashref); |
Line 1924 returns: nothing
|
Line 1939 returns: nothing
|
if ($faq ne '' || $component_help ne '' || $bug ne '') { |
if ($faq ne '' || $component_help ne '' || $bug ne '') { |
$icons .= &Apache::loncommon::help_open_menu($component, |
$icons .= &Apache::loncommon::help_open_menu($component, |
$component_help, |
$component_help, |
$faq,$bug); |
$faq,$bug,'','','','', |
|
$links_target); |
} |
} |
if ($topic_help && $topic_help_text) { |
if ($topic_help && $topic_help_text) { |
$icons .= ' '.&Apache::loncommon::help_open_topic($topic_help,&mt($topic_help_text),'', |
$icons .= ' '.&Apache::loncommon::help_open_topic($topic_help,&mt($topic_help_text),'', |
undef,600); |
undef,600,'',$links_target); |
} |
} |
# |
# |
|
|
Line 2106 returns: nothing
|
Line 2122 returns: nothing
|
} # End of scope for @Crumbs |
} # End of scope for @Crumbs |
|
|
sub docs_breadcrumbs { |
sub docs_breadcrumbs { |
my ($allowed,$crstype,$contenteditor,$title,$precleared)=@_; |
my ($allowed,$crstype,$contenteditor,$title,$precleared,$checklinkprot)=@_; |
my ($folderpath,@folders,$supplementalflag); |
my ($folderpath,@folders,$supplementalflag); |
@folders = split('&',$env{'form.folderpath'}); |
@folders = split('&',$env{'form.folderpath'}); |
if ($env{'form.folderpath'} =~ /^supplemental/) { |
if ($env{'form.folderpath'} =~ /^supplemental/) { |
Line 2177 sub docs_breadcrumbs {
|
Line 2193 sub docs_breadcrumbs {
|
if (!$allowed && !$contenteditor) { |
if (!$allowed && !$contenteditor) { |
$menulink = 1; |
$menulink = 1; |
} |
} |
|
if ($checklinkprot) { |
|
if ($env{'request.deeplink.login'}) { |
|
my $linkprotout = &Apache::lonmenu::linkprot_exit(); |
|
if ($linkprotout) { |
|
&Apache::lonhtmlcommon::add_breadcrumb_tool('tools',$linkprotout); |
|
} |
|
} |
|
} |
return (&breadcrumbs(undef,undef,$menulink,'nohelp',undef,undef, |
return (&breadcrumbs(undef,undef,$menulink,'nohelp',undef,undef, |
$contenteditor), |
$contenteditor), |
$randompick,$ishidden,$isencrypted,$plain, |
$randompick,$ishidden,$isencrypted,$plain, |