--- loncom/xml/lonxml.pm 2004/10/12 22:55:22 1.344 +++ loncom/xml/lonxml.pm 2004/10/18 19:49:58 1.345 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # XML Parser Module # -# $Id: lonxml.pm,v 1.344 2004/10/12 22:55:22 albertel Exp $ +# $Id: lonxml.pm,v 1.345 2004/10/18 19:49:58 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1573,6 +1573,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'};