--- loncom/interface/lonconfigsettings.pm 2017/11/30 12:45:55 1.39 +++ loncom/interface/lonconfigsettings.pm 2021/07/30 13:48:20 1.49 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set domain-wide configuration settings # -# $Id: lonconfigsettings.pm,v 1.39 2017/11/30 12:45:55 raeburn Exp $ +# $Id: lonconfigsettings.pm,v 1.49 2021/07/30 13:48:20 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -215,19 +215,54 @@ $jscript my $optionsprefix = 'LC_options_helpdesk_'; $onload .= "toggleHelpdeskRow(document.display,'overrides','$customclass','$optionsprefix');"; } + if (grep(/^lti$/,@actions)) { + $onload .= "toggleLTI(document.display,'user','add');". + "toggleLTI(document.display,'crs','add');". + "toggleLTI(document.display,'sec','add');". + "toggleLTI(document.display,'lcauth','add');". + "toggleLTI(document.display,'lcmenu','add');". + "toggleLTI(document.display,'passback','add');". + "toggleLTI(document.display,'callback','add');"; + if (ref($values) eq 'HASH') { + if (ref($values->{'lti'}) eq 'HASH') { + my $numlti = scalar(keys(%{$values->{'lti'}})); + for (my $i=0; $i<$numlti; $i++) { + $onload .= "toggleLTI(document.display,'user','$i');". + "toggleLTI(document.display,'crs','$i');". + "toggleLTI(document.display,'sec','$i');". + "toggleLTI(document.display,'lcauth','$i');". + "toggleLTI(document.display,'lcmenu','$i');". + "toggleLTI(document.display,'passback','$i');". + "toggleLTI(document.display,'callback','$i');"; + } + } + } + } if (grep(/^ltitools$/,@actions)) { $onload .= "toggleLTITools(document.display,'passback','add');". - "toggleLTITools(document.display,'roster','add');"; + "toggleLTITools(document.display,'roster','add');". + "toggleLTITools(document.display,'user','add');"; if (ref($values) eq 'HASH') { if (ref($values->{'ltitools'}) eq 'HASH') { my $numltitools = scalar(keys(%{$values->{'ltitools'}})); for (my $i=0; $i<$numltitools; $i++) { $onload .= "toggleLTITools(document.display,'passback','$i');". - "toggleLTITools(document.display,'roster','$i');"; + "toggleLTITools(document.display,'roster','$i');". + "toggleLTITools(document.display,'user','$i');"; } } } } + if (grep(/^wafproxy$/,@actions)) { + $onload .= "toggleWAF();checkWAF();updateWAF();"; + } + if (grep(/^proctoring$/,@actions)) { + $onload .= "toggleProctoring(document.display,'proctorio');". + "toggleProctoring(document.display,'examity');"; + } + if (grep(/^scantron$/,@actions)) { + $onload .= "toggleScantron('document.display');"; + } if ($onload) { my %loaditems = ( 'onload' => $onload, @@ -524,8 +559,8 @@ sub display_choices { $thirddiv = 1; } } - $r->print('
'); } + $r->print('
'); $r->print(&print_footer($r,$phase,'display','Display',undef,$container,$parm_permission)); $r->print(''); if ($container) {