--- loncom/homework/structuretags.pm 2004/05/27 22:25:16 1.252 +++ loncom/homework/structuretags.pm 2004/05/28 19:26:05 1.253 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: structuretags.pm,v 1.252 2004/05/27 22:25:16 albertel Exp $ +# $Id: structuretags.pm,v 1.253 2004/05/28 19:26:05 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -335,9 +335,12 @@ ENDCHECKOUT } sub firstaccess_msg { - my ($time)=@_; + my ($time,$symb)=@_; + my ($map)=&Apache::lonnet::decode_symb($symb); + my $foldertitle=&Apache::lonnet::gettitle($map); + &Apache::lonxml::debug("map is $map title is $foldertitle"); return (<This resource is open for a limited time, once you click the 'Show Resource' button below you have $time to complete all resources in this sequence. +

The resources in "$foldertitle" are open for a limited time. Once you click the 'Show Resource' button below you have $time to complete all resources "$foldertitle".

@@ -501,7 +504,7 @@ sub start_problem { my $msg=$body_tag_start; if ($status eq 'UNAVAILABLE') { $msg.='

'.&mt('Unable to determine if this resource is open due to network problems. Please try again later.').'

'; - } else { + } elsif ($status ne 'NOT_YET_VIEWED') { $msg.='

'.&mt('Not open to be viewed').'

'; } if ($status eq 'CLOSED' || $status eq 'INVALID_ACCESS') { @@ -509,7 +512,7 @@ sub start_problem { } elsif ($status eq 'UNCHECKEDOUT') { $msg.=&checkout_msg; } elsif ($status eq 'NOT_YET_VIEWED') { - $msg.=&firstaccess_msg($accessmsg); + $msg.=&firstaccess_msg($accessmsg,$symb); } $result.=$msg.'
'; } elsif ($target eq 'tex') {