--- loncom/homework/bridgetask.pm 2005/11/15 21:41:10 1.78 +++ loncom/homework/bridgetask.pm 2005/11/21 17:47:37 1.80 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: bridgetask.pm,v 1.78 2005/11/15 21:41:10 albertel Exp $ +# $Id: bridgetask.pm,v 1.80 2005/11/21 17:47:37 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -671,7 +671,6 @@ sub get_key_todo { } return (undef,undef) } - sub end_Task { my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_; my $result=''; @@ -710,20 +709,22 @@ DONEBUTTON $Apache::lonhomework::history{"resource.$version.status"} =~ /^(pass|fail)$/) { my $bt_status=$Apache::lonhomework::history{"resource.$version.status"}; my $title=&Apache::lonnet::gettitle(); - my %slot=&Apache::lonnet::get_slot($Apache::inputtags::slot_name); + + my $slot_name= + $Apache::lonhomework::history{"resource.$version.checkedin.slot"}; + my %slot=&Apache::lonnet::get_slot($slot_name); my $start_time= &Apache::lonlocal::locallocaltime($slot{'starttime'}); - my $status; - $status.="\n