version 1.247, 2008/12/04 13:41:37
|
version 1.248, 2008/12/08 23:07:03
|
Line 1105 sub inlinemenu {
|
Line 1105 sub inlinemenu {
|
} |
} |
foreach my $item (sort(keys(%active))) { |
foreach my $item (sort(keys(%active))) { |
$output.=$inlineremote[$item]; |
$output.=$inlineremote[$item]; |
&Apache::lonnet::logthis("item=$item output=$inlineremote[$item]"); |
|
} |
} |
$output.='</table>'; |
$output.='</table>'; |
$output.='</div>'; |
$output.='</div>'; |
Line 1225 sub rawconfig {
|
Line 1224 sub rawconfig {
|
} |
} |
} |
} |
} |
} |
|
} elsif ($pro eq 'tools') { |
|
my @tools = ('aboutme','blog','portfolio'); |
|
if (grep(/^\Q$prt\E$/,@tools)) { |
|
if (defined($env{'environment.tools.'.$prt}) && |
|
($env{'environment.tools.'.$prt} == 0)) { |
|
$output.=&clear($row,$col); |
|
next; |
|
} |
|
} |
|
$prt='any'; |
|
$output.=&secondlevel( |
|
$uname,$udom,$rol,$crs,$pub,$con,$row,$col,$prt,$img,$top,$bot,$act,$desc,$cat); |
} |
} |
} |
} |
unless (($env{'browser.interface'} eq 'textual') || |
unless (($env{'browser.interface'} eq 'textual') || |