loncom/interface/lonaboutme.pm - diff

Return to lonaboutme.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.69, 2008/01/20 22:25:05	version 1.70, 2008/09/11 02:07:27
Line 620 sub parse_directory {	Line 620 sub parse_directory {

my $portfolio_root = &Apache::portfolio::get_portfolio_root($cdom,$cnum,	my $portfolio_root = &Apache::portfolio::get_portfolio_root($cdom,$cnum,
$group);	$group);
	my $getpropath = 1;
my %dirlist = map {	my %dirlist = map {
((split('&',$_,2))[0],1)	((split('&',$_,2))[0],1)
} &Apache::lonnet::dirlist($path,$cdom,$cnum,$portfolio_root);	} &Apache::lonnet::dirlist($portfolio_root.$path,$cdom,$cnum,$getpropath);
foreach my $item (sort(keys(%{$currhash}))) {	foreach my $item (sort(keys(%{$currhash}))) {
$output .= &portfolio_row_start();	$output .= &portfolio_row_start();
$output .= '<td style="padding-left: '.($depth*25).'px">';	$output .= '<td style="padding-left: '.($depth*25).'px">';