--- rat/lonpage.pm 2020/02/17 16:12:35 1.130 +++ rat/lonpage.pm 2020/02/17 23:04:24 1.131 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Page Handler # -# $Id: lonpage.pm,v 1.130 2020/02/17 16:12:35 raeburn Exp $ +# $Id: lonpage.pm,v 1.131 2020/02/17 23:04:24 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -898,6 +898,10 @@ sub get_buttons { return; } } + my $crs_sec = $env{'request.course.id'} . (($env{'request.course.sec'} ne '') + ? "/$env{'request.course.sec'}" + : ''); + if ($hash->{'encrypted_'.$rid}) { $symb=&Apache::lonenc::encrypted($symb); $esrc=&Apache::lonenc::encrypted($esrc); @@ -985,14 +989,14 @@ sub get_buttons { if ((&Apache::lonnet::allowed('cre','/')) && (&Apache::lonnet::metadata($url,'sourceavail') eq 'open')) { $viewsrcbutton = 1; - } elsif (&Apache::lonnet::allowed('vxc',$env{'request.course.id'})) { + } elsif (&Apache::lonnet::allowed('vxc',$crs_sec)) { if ($url =~ m{^\Q/res/$cdom/\E($LONCAPA::match_username)/}) { my $auname = $1; if (($env{'request.course.adhocsrcaccess'} ne '') && (grep(/^\Q$auname\E$/,split(/,/,$env{'request.course.adhocsrcaccess'})))) { $viewsrcbutton = 1; } elsif ((&Apache::lonnet::metadata($url,'sourceavail') eq 'open') && - (&Apache::lonnet::allowed('bre','/'))) { + (&Apache::lonnet::allowed('bre',$crs_sec))) { $viewsrcbutton = 1; } }