--- loncom/xml/lonxml.pm 2004/08/29 08:17:22 1.332.2.1 +++ loncom/xml/lonxml.pm 2004/10/18 19:50:43 1.332.2.2 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # XML Parser Module # -# $Id: lonxml.pm,v 1.332.2.1 2004/08/29 08:17:22 albertel Exp $ +# $Id: lonxml.pm,v 1.332.2.2 2004/10/18 19:50:43 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1529,6 +1529,12 @@ sub whichuser { if (defined($ENV{'form.grade_symb'})) { my $tmp_courseid=$ENV{'form.grade_courseid'}; my $allowed=&Apache::lonnet::allowed('vgr',$tmp_courseid); + if (!$allowed && + exists($ENV{'request.course.sec'}) && + $ENV{'request.course.sec'} !~ /^\s*$/) { + $allowed=&Apache::lonnet::allowed('vgr',$ENV{'form.grade_courseid'}. + '/'.$ENV{'request.course.sec'}); + } if ($allowed) { $symb=$ENV{'form.grade_symb'}; $courseid=$ENV{'form.grade_courseid'};