--- loncom/homework/bridgetask.pm 2005/10/12 14:45:44 1.69 +++ loncom/homework/bridgetask.pm 2005/10/14 17:27:23 1.71 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: bridgetask.pm,v 1.69 2005/10/12 14:45:44 albertel Exp $ +# $Id: bridgetask.pm,v 1.71 2005/10/14 17:27:23 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -317,8 +317,8 @@ sub submission_time_stamp { my $slot_name=$Apache::lonhomework::history{'resource.'.$version.'.checkedin.slot'}; my %slot=&Apache::lonnet::get_slot($slot_name); my $diff = $slot{'endtime'} - $submissiontime; - my ($color,$when)=('red','after'); - if ($diff > 0) { ($color,$when)=('green','before'); } + my ($color,$when)=('#FF6666','after'); + if ($diff > 0) { ($color,$when)=('#336600','before'); } my $info; if ($diff%60) { $info=($diff%60).' seconds'; } $diff=int($diff/60); @@ -335,11 +335,41 @@ sub submission_time_stamp { return $result; } +sub webgrade_standard_info { + my ($version)=&get_version(); + my (undef,undef,$udom,$uname) = &Apache::lonxml::whichuser(); + my $file_url = '/uploaded/'.$udom.'/'.$uname.'/portfolio/'; + my $file_list="