version 1.719, 2025/01/07 01:25:57
|
version 1.720, 2025/01/07 03:51:55
|
Line 8659 sub generate_admin_menu {
|
Line 8659 sub generate_admin_menu {
|
if (grep(/^\Q$crshome\E$/,@ids)) { |
if (grep(/^\Q$crshome\E$/,@ids)) { |
$linkurl = $crsauthorurl; |
$linkurl = $crsauthorurl; |
} else { |
} else { |
$linkurl = |
my $jscall = &Apache::lonhtmlcommon::jump_to_editres($crsauthorurl,$crshome,1); |
&Apache::lonhtmlcommon::jump_to_editres($crsauthorurl,$crshome,1); |
if ($jscall) { |
|
$linkurl = 'javascript:'.$jscall; |
|
} |
} |
} |
if ((ref($menu[0]) eq 'HASH') && (ref($menu[0]->{'items'}) eq 'ARRAY')) { |
if ((ref($menu[0]) eq 'HASH') && (ref($menu[0]->{'items'}) eq 'ARRAY') && ($linkurl)) { |
push(@{$menu[0]->{items}}, |
push(@{$menu[0]->{items}}, |
{ linktext => $lt{'ca'}, |
{ linktext => $lt{'ca'}, |
url => $linkurl, |
url => $linkurl, |