--- loncom/homework/structuretags.pm 2009/11/27 21:20:44 1.444.4.2.2.1 +++ loncom/homework/structuretags.pm 2010/01/29 15:33:02 1.444.4.4 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: structuretags.pm,v 1.444.4.2.2.1 2009/11/27 21:20:44 www Exp $ +# $Id: structuretags.pm,v 1.444.4.4 2010/01/29 15:33:02 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -237,17 +237,17 @@ sub page_start { my $page_start = &Apache::loncommon::start_page($name,$extra_head, \%body_args); -# if (!defined($found{'body'}) -# && $env{'request.state'} ne 'construct' -# && ($target eq 'web' || $target eq 'webgrade')) { -# -# my ($symb,undef,undef,undef,$publicuser)= &Apache::lonnet::whichuser(); -# if ($symb eq '' && !$publicuser) { -# $page_start .= '

' -# .&mt('Browsing resource, all submissions are temporary.') -# .'

'; -# } -# } + if (!defined($found{'body'}) + && $env{'request.state'} ne 'construct' + && ($target eq 'web' || $target eq 'webgrade')) { + + my ($symb,undef,undef,undef,$publicuser)= &Apache::lonnet::whichuser(); + if ($symb eq '' && !$publicuser) { + $page_start .= '

' + .&mt('Browsing resource, all submissions are temporary.') + .'

'; + } + } if (!defined($found{'body'}) && $env{'request.state'} ne 'construct') { $page_start .= &Apache::lonxml::message_location(); @@ -894,26 +894,25 @@ sub start_problem { if ($env{'request.state'} ne "construct" && ($symb eq '' || $Apache::lonhomework::type eq 'practice')) { $form_tag_start.=''; -#. -# ''; + $rndseed.'" />'. + ''; if (exists($env{'form.username'})) { $form_tag_start.= ''; } -# if ($env{'request.role.adv'}) { -# $form_tag_start.= '