loncom/interface/lonmeta.pm - diff

Return to lonmeta.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.165, 2006/08/08 19:35:53	version 1.166, 2006/08/08 21:32:36
Line 287 sub portfolio_linked_path {	Line 287 sub portfolio_linked_path {
if ($group) {	if ($group) {
$start = "groups/$group/".$start;	$start = "groups/$group/".$start;
}	}
my %anchor_fields;	my %anchor_fields = (
%anchor_fields = (
'selectfile' => $start,	'selectfile' => $start,
'currentpath' => '/'	'currentpath' => '/'
);	);
Line 299 sub portfolio_linked_path {	Line 298 sub portfolio_linked_path {
foreach my $dir (@tree) {	foreach my $dir (@tree) {
$fullpath .= $dir.'/';	$fullpath .= $dir.'/';
$result .= '/';	$result .= '/';
my %anchor_fields = ();	my %anchor_fields = (
%anchor_fields = (
'selectfile' => $dir,	'selectfile' => $dir,
'currentpath' => $fullpath	'currentpath' => $fullpath
);	);