--- loncom/homework/bridgetask.pm 2005/05/31 16:31:01 1.35 +++ loncom/homework/bridgetask.pm 2005/06/04 08:17:06 1.37 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: bridgetask.pm,v 1.35 2005/05/31 16:31:01 albertel Exp $ +# $Id: bridgetask.pm,v 1.37 2005/06/04 08:17:06 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -36,6 +36,7 @@ use Apache::File(); use Apache::lonmenu; use Apache::lonlocal; use Apache::lonxml; +use Apache::slotrequest(); use Time::HiRes qw( gettimeofday tv_interval ); BEGIN { @@ -91,6 +92,7 @@ sub proctor_check_auth { sub get_version { my ($version,$previous); if ($env{'form.previousversion'} && + $env{'form.previousversion'} ne 'current' && defined($Apache::lonhomework::history{'resource.'.$env{'form.previousversion'}.'.status'})) { $version=$env{'form.previousversion'}; $previous=1; @@ -129,6 +131,7 @@ sub add_previous_version_button { my $list='\n\n"; + $list.=''; $result.='
'; + my $symb=&Apache::lonnet::symbread(); + my ($slot_name,$slot)=&Apache::slotrequest::check_for_reservation($symb); + if ($slot_name) { + my $description=&Apache::slotrequest::get_description($slot_name, + $slot); + $result.=(<