--- rat/lonpage.pm 2020/11/13 02:46:48 1.111.2.10.2.3
+++ rat/lonpage.pm 2020/11/10 23:55:32 1.139
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Page Handler
#
-# $Id: lonpage.pm,v 1.111.2.10.2.3 2020/11/13 02:46:48 raeburn Exp $
+# $Id: lonpage.pm,v 1.139 2020/11/10 23:55:32 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -202,7 +202,7 @@ sub handler {
my ($pagesymb,$courseid,$domain,$name)=&Apache::lonnet::whichuser();
unless ($pagesymb) {
$pagesymb=&Apache::lonnet::symbread($requrl);
- }
+ }
if ($pagesymb && ($courseid ne '') && ($domain ne '') && ($name ne '')) {
my %times=&Apache::lonnet::get('firstaccesstimes',
[$courseid."\0".$pagesymb],
@@ -381,7 +381,7 @@ ENDEXT
} elsif ($cellemb{$_} eq 'ssi') {
# --------------------------------------------------------- This is an SSI cell
my $prefix='p_'.$_.'_';
- my $idprefix='p_'.join('_',($mapid,$resid,''));
+ my $idprefix= 'p_'.join('_',($mapid,$resid,''));
my %posthash=('request.prefix' => $prefix,
'LONCAPA_INTERNAL_no_discussion' => 'true',
'symb' => $symb);
@@ -419,9 +419,6 @@ ENDEXT
} elsif ($env{'form.'.$prefix.'markaccess'} eq 'yes') {
$posthash{'markaccess'} = $env{'form.'.$prefix.'markaccess'};
}
- if ($env{'environment.remote'} eq 'on') {
- $posthash{'inhibitmenu'} = 'yes';
- }
my $output=Apache::lonnet::ssi($src,%posthash);
$output=~s|//(\s*)?\s||gs;
if (($target eq 'tex') || ($target eq 'tex_answer')) {
@@ -690,7 +687,7 @@ ENDEXT
&Apache::loncommon::content_type($r,'text/html');
$r->send_http_header;
$r->print(&Apache::loncommon::start_page(undef,undef,
- {'force_register' => 1}));
+ {'force_register' => 1,}));
$r->print(&mt('This page is either empty or it only contains resources that are currently hidden').'. ');
$r->print('
'.&mt('Please use the LON-CAPA navigation arrows to move to another item in the course').
&Apache::loncommon::end_page());
@@ -1043,7 +1040,7 @@ sub get_buttons {
if (($hash->{'src_'.$rid}=~/$LONCAPA::assess_re/) &&
($hash->{'src_'.$rid} !~ m-^/uploaded/-)) {
- if ((&Apache::lonnet::allowed('mgr',$crs_sec)) ||
+ if ((&Apache::lonnet::allowed('mgr',$crs_sec)) ||
(&Apache::lonnet::allowed('vgr',$crs_sec))) {
$metainfo.=
''.
'&command=gradingmenu">'.
''.
- '';
- }
- if ((&Apache::lonnet::allowed('opa',$crs_sec)) ||
+ '';
+ }
+ if ((&Apache::lonnet::allowed('opa',$crs_sec)) ||
(&Apache::lonnet::allowed('vpa',$crs_sec))) {
$metainfo.=
'