version 1.291, 2009/10/16 23:35:08
|
version 1.294, 2009/10/20 03:18:14
|
Line 185 sub primary_menu {
|
Line 185 sub primary_menu {
|
} else { |
} else { |
if (ref($menuitem) eq 'ARRAY') { |
if (ref($menuitem) eq 'ARRAY') { |
my @items = @{$menuitem}; |
my @items = @{$menuitem}; |
$items[0] = 'javascript:'.$menuitem; |
$items[0] = 'javascript:'.$menuitem->[0].';'; |
$menu .= &prep_menuitem(\@items); |
$menu .= &prep_menuitem(\@items); |
} |
} |
} |
} |
Line 769 $menuitems.="Make notes and annotations
|
Line 769 $menuitems.="Make notes and annotations
|
} |
} |
} |
} |
unless ($env{'request.noversionuri'}=~/\/(bulletinboard|smppg|navmaps|syllabus|aboutme)(\?|$)/) { |
unless ($env{'request.noversionuri'}=~/\/(bulletinboard|smppg|navmaps|syllabus|aboutme)(\?|$)/) { |
if (!$env{'request.enc'}) { |
if ((!$env{'request.enc'}) && ($env{'request.noversionuri'} !~ m{^/adm/wrapper/ext/})) { |
$menuitems.=(<<ENDREALRES); |
$menuitems.=(<<ENDREALRES); |
s&6&3&catalog.gif&catalog[_2]&info[_1]&catalog_info()&Show Metadata |
s&6&3&catalog.gif&catalog[_2]&info[_1]&catalog_info()&Show Metadata |
ENDREALRES |
ENDREALRES |
Line 1519 sub utilityfunctions {
|
Line 1519 sub utilityfunctions {
|
return ''; } |
return ''; } |
|
|
my $currenturl=&Apache::lonnet::clutter(&Apache::lonnet::fixversion((split(/\?/,$env{'request.noversionuri'}))[0])); |
my $currenturl=&Apache::lonnet::clutter(&Apache::lonnet::fixversion((split(/\?/,$env{'request.noversionuri'}))[0])); |
|
if ($currenturl =~ m{^/adm/wrapper/ext/}) { |
|
if ($env{'request.external.querystring'}) { |
|
$currenturl .= ($currenturl=~/\?/)?'&':'?'.$env{'request.external.querystring'}; |
|
} |
|
} |
$currenturl=&Apache::lonenc::check_encrypt(&unescape($currenturl)); |
$currenturl=&Apache::lonenc::check_encrypt(&unescape($currenturl)); |
|
|
my $currentsymb=&Apache::lonenc::check_encrypt($env{'request.symb'}); |
my $currentsymb=&Apache::lonenc::check_encrypt($env{'request.symb'}); |