--- loncom/interface/lonmeta.pm 2006/06/23 00:28:43 1.159 +++ loncom/interface/lonmeta.pm 2006/07/19 15:31:05 1.160 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Metadata display handler # -# $Id: lonmeta.pm,v 1.159 2006/06/23 00:28:43 raeburn Exp $ +# $Id: lonmeta.pm,v 1.160 2006/07/19 15:31:05 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -287,8 +287,7 @@ sub portfolio_linked_path { if ($group) { $start = "groups/$group/".$start; } - my $result = &Apache::portfolio::make_anchor($port_path,$start,'/', - undef,undef,undef,$group); + my $result = &Apache::portfolio::make_anchor($port_path,$start,'/'); my $fullpath = '/'; my (undef,@tree) = split('/',$path); @@ -296,8 +295,7 @@ sub portfolio_linked_path { foreach my $dir (@tree) { $fullpath .= $dir.'/'; $result .= '/'; - $result .= &Apache::portfolio::make_anchor($port_path,$dir,$fullpath, - undef,undef,undef,$group); + $result .= &Apache::portfolio::make_anchor($port_path,$dir,$fullpath); } $result .= "/$filename"; return $result; @@ -316,6 +314,9 @@ sub get_port_path_and_group { } else { $port_path = '/adm/portfolio'; } + if ($env{'form.group'} ne $group) { + $env{'form.group'} = $group) { + } return ($port_path,$group); }