loncom/homework/bridgetask.pm - diff

Return to bridgetask.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.42, 2005/08/15 19:41:43	version 1.43, 2005/09/07 19:54:54
Line 1036 sub get_instance {	Line 1036 sub get_instance {
$result.='<tr><td colspan="4">';	$result.='<tr><td colspan="4">';
my (undef,undef,$udom,$uname) = &Apache::lonxml::whichuser();	my (undef,undef,$udom,$uname) = &Apache::lonxml::whichuser();
my $file_url = '/uploaded/'.$udom.'/'.$uname.'/portfolio';	my $file_url = '/uploaded/'.$udom.'/'.$uname.'/portfolio';
foreach my $partial_file (split(',',$Apache::lonhomework::history{"resource.$version.bridgetask.portfiles"})) {	foreach my $partial_file (split(',',$Apache::lonhomework::history{"resource.$version.0.bridgetask.portfiles"})) {
my $file=$file_url.$partial_file;	my $file=$file_url.$partial_file;
&Apache::lonnet::allowuploaded('/adm/bridgetask',$file);	&Apache::lonnet::allowuploaded('/adm/bridgetask',$file);
$result.='<a href="'.$file.'" target="lonGRDs"><img src="'.	$result.='<a href="'.$file.'" target="lonGRDs"><img src="'.