[LON-CAPA-cvs] cvs: loncom(version_2_11_X) /interface loncommon.pm
raeburn
raeburn at source.lon-capa.org
Tue Oct 8 15:45:02 EDT 2024
raeburn Tue Oct 8 19:45:02 2024 EDT
Modified files: (Branch: version_2_11_X)
/loncom/interface loncommon.pm
Log:
- Remote Control is on, eliminate loading of javascript for switchserver page
because it will not be used.
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.1075.2.173 loncom/interface/loncommon.pm:1.1075.2.174
--- loncom/interface/loncommon.pm:1.1075.2.173 Tue Oct 8 19:30:17 2024
+++ loncom/interface/loncommon.pm Tue Oct 8 19:45:01 2024
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common routines
#
-# $Id: loncommon.pm,v 1.1075.2.173 2024/10/08 19:30:17 raeburn Exp $
+# $Id: loncommon.pm,v 1.1075.2.174 2024/10/08 19:45:01 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -5810,17 +5810,19 @@
my $funclist;
if (($env{'environment.remote'} eq 'on') && ($env{'request.state'} ne 'construct')) {
- $bodytag .= Apache::lonhtmlcommon::scripttag(Apache::lonmenu::utilityfunctions($httphost), 'start')."\n".
- Apache::lonmenu::serverform();
- my $forbodytag;
- &Apache::lonmenu::prepare_functions($env{'request.noversionuri'},
- $forcereg,$args->{'group'},
- $args->{'bread_crumbs'},
- $advtoolsref,'','',\$forbodytag);
- unless (ref($args->{'bread_crumbs'}) eq 'ARRAY') {
- $funclist = $forbodytag;
+ unless ($args->{'switchserver'}) {
+ $bodytag .= Apache::lonhtmlcommon::scripttag(Apache::lonmenu::utilityfunctions($httphost), 'start')."\n".
+ Apache::lonmenu::serverform();
+ my $forbodytag;
+ &Apache::lonmenu::prepare_functions($env{'request.noversionuri'},
+ $forcereg,$args->{'group'},
+ $args->{'bread_crumbs'},
+ $advtoolsref,'','',\$forbodytag);
+ unless (ref($args->{'bread_crumbs'}) eq 'ARRAY') {
+ $funclist = $forbodytag;
+ }
+ $bodytag .= Apache::lonhtmlcommon::scripttag('', 'end');
}
- $bodytag .= Apache::lonhtmlcommon::scripttag('', 'end');
} else {
# if ($env{'request.state'} eq 'construct') {
More information about the LON-CAPA-cvs
mailing list