--- loncom/interface/domainprefs.pm	2022/02/21 05:31:41	1.160.6.118.2.5
+++ loncom/interface/domainprefs.pm	2022/02/21 13:56:22	1.160.6.118.2.6
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to set domain-wide configuration settings
 #
-# $Id: domainprefs.pm,v 1.160.6.118.2.5 2022/02/21 05:31:41 raeburn Exp $
+# $Id: domainprefs.pm,v 1.160.6.118.2.6 2022/02/21 13:56:22 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -219,9 +219,9 @@ sub handler {
                 'coursedefaults','usersessions','loadbalancing',
                 'requestauthor','selfenrollment','inststatus',
                 'passwords','ltitools','ltisec','wafproxy','ipaccess'],$dom);
+    my %encconfig =
+        &Apache::lonnet::get_dom('encconfig',['ltitools','linkprot'],$dom,undef,1);
     if (ref($domconfig{'ltitools'}) eq 'HASH') {
-        my %encconfig =
-            &Apache::lonnet::get_dom('encconfig',['ltitools','linkprot'],$dom,undef,1);
         if (ref($encconfig{'ltitools'}) eq 'HASH') {
             foreach my $id (keys(%{$domconfig{'ltitools'}})) {
                 if (ref($domconfig{'ltitools'}{$id}) eq 'HASH') {
@@ -3155,6 +3155,9 @@ sub lti_toggle_js {
     my %servers = &Apache::lonnet::get_servers($dom,'library');
     my $primary = &Apache::lonnet::domain($dom,'primary');
     my $course_servers = "'".join("','",keys(%servers))."'";
+    return <<"ENDSCRIPT";
+<script type="text/javascript">
+// <![CDATA[
 function toggleLTIEncKey(form) {
     var shownhosts = new Array();
     var hiddenhosts = new Array();
@@ -13113,7 +13116,7 @@ sub modify_lti {
         $errors .= '<li>'.$proterror.'</li>';
     }
 
-    my $putresult;
+    my ($putresult,%keystore);
     if (keys(%secchanges)) {
         my %ltienchash;
         my %ltihash = (
@@ -13121,7 +13124,6 @@ sub modify_lti {
                       );
         $putresult = &Apache::lonnet::put_dom('configuration',\%ltihash,$dom);
         if ($putresult eq 'ok') {
-            my %keystore;
             if ($secchanges{'private'}) {
                 my $who = &escape($env{'user.name'}.':'.$env{'user.domain'});
                 foreach my $hostid (keys(%newkeyset)) {