--- loncom/interface/lonconfigsettings.pm 2022/02/20 19:43:12 1.21.4.13.2.3 +++ loncom/interface/lonconfigsettings.pm 2022/02/21 16:12:49 1.21.4.13.2.4 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set domain-wide configuration settings # -# $Id: lonconfigsettings.pm,v 1.21.4.13.2.3 2022/02/20 19:43:12 raeburn Exp $ +# $Id: lonconfigsettings.pm,v 1.21.4.13.2.4 2022/02/21 16:12:49 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -293,6 +293,13 @@ $jscript my $optionsprefix = 'LC_options_helpdesk_'; $onload .= "toggleHelpdeskRow(document.display,'overrides','$customclass','$optionsprefix');"; } + if (grep(/^lti$/,@actions)) { + my %servers = &Apache::lonnet::get_servers($dom,'library'); + foreach my $server (keys(%servers)) { + $onload .= "togglePrivKey(document.display,'$server');"; + } + $onload .= "toggleLTIEncKey(document.display);"; + } if (grep(/^ltitools$/,@actions)) { $onload .= "toggleLTITools(document.display,'user','add');"; if (ref($values) eq 'HASH') { @@ -561,6 +568,10 @@ sub display_settings { $settings = $inststatus; } } + } elsif ($item eq 'lti') { + if (ref($values->{'ltisec'}) eq 'HASH') { + $settings = $values->{'ltisec'}; + } } ($output{$item},$rowtotal{$item}) = &Apache::domainprefs::print_config_box($r,$dom,$confname,