--- loncom/homework/bridgetask.pm 2006/03/02 22:06:27 1.116 +++ loncom/homework/bridgetask.pm 2006/03/28 21:06:00 1.124 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: bridgetask.pm,v 1.116 2006/03/02 22:06:27 albertel Exp $ +# $Id: bridgetask.pm,v 1.124 2006/03/28 21:06:00 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -176,10 +176,10 @@ sub add_grading_button { if (scalar(keys(%sections)) < 3) { $size=scalar(keys(%sections))+2; } - my $sec_select = '
'; } return $result; } @@ -371,12 +372,15 @@ sub submission_time_stamp { return $result; } -sub webgrade_standard_info { - my ($version)=&get_version(); - my (undef,undef,$udom,$uname) = &Apache::lonxml::whichuser(); +sub file_list { + my ($files,$uname,$udom) = @_; + if (!defined($uname) || !defined($udom)) { + (undef,undef,$udom,$uname) = &Apache::lonxml::whichuser(); + } my $file_url = '/uploaded/'.$udom.'/'.$uname.'/portfolio/'; - my $file_list="