--- loncom/interface/lonconfigsettings.pm	2025/03/15 03:05:15	1.21.4.13.2.13
+++ loncom/interface/lonconfigsettings.pm	2025/06/14 02:50:25	1.75
@@ -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.13 2025/03/15 03:05:15 raeburn Exp $
+# $Id: lonconfigsettings.pm,v 1.75 2025/06/14 02:50:25 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -35,6 +35,7 @@ use Apache::lonnet;
 use Apache::loncommon();
 use Apache::lonhtmlcommon();
 use Apache::lonlocal;
+use Apache::lonparmset();
 use Apache::courseclassifier();
 use LONCAPA qw(:DEFAULT :match);
 use File::Copy;
@@ -268,6 +269,7 @@ $jscript
             if (grep(/^ltitools$/,@actions)) {
                 $onload .= "toggleLTITools(document.display,'passback','add');".
                            "toggleLTITools(document.display,'roster','add');".
+                           "toggleLTITools(document.display,'desturl','add');".
                            "toggleLTITools(document.display,'returnurl','add');".
                            "toggleLTITools(document.display,'user','add');";
                 if (ref($values) eq 'HASH') {
@@ -276,6 +278,7 @@ $jscript
                         for (my $i=0; $i<$numltitools; $i++) {
                             $onload .= "toggleLTITools(document.display,'passback','$i');".
                                        "toggleLTITools(document.display,'roster','$i');".
+                                       "toggleLTITools(document.display,'desturl','$i');".
                                        "toggleLTITools(document.display,'returnurl','$i');".
                                        "toggleLTITools(document.display,'user','$i');";
                         }
@@ -290,6 +293,10 @@ $jscript
             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);";
             }
@@ -407,6 +414,9 @@ $jscript
 <input type="hidden" name="pres_value" />
 </form>
 ');
+    if ($container) {
+       &Apache::lonparmset::startSettingsScreen($r,$container,$crstype);
+    }
     $r->print('<form method="post" name="'.$phase.'" action="'.$action.'"'.
               ' enctype="multipart/form-data">');
     return;
@@ -571,6 +581,9 @@ sub print_footer {
     }
     if ($phase eq 'process') {
         $r->print('</form>');
+        if ($container) {
+           &Apache::lonparmset::endSettingsScreen($r);
+        }
         $r->print(&Apache::loncommon::end_page());
     }
     return;
@@ -678,12 +691,15 @@ sub display_settings {
                         if (ref($values) eq 'HASH') {
                             $settings = $values->{$item};
                         }
-                        if ($item eq 'usersessions') {
-                            $r->print('<script type="text/javascript">'."\n".
-                                      '// <![CDATA['."\n".
-                                      &Apache::loncommon::check_uncheck_jscript()."\n".
-                                      '// ]]>'."\n".
-                                      '</script>'."\n");
+                        if (($item eq 'usersessions') || ($item eq 'ssl')) {
+                            unless ($got_check_uncheck) {
+                                $r->print('<script type="text/javascript">'."\n".
+                                          '// <![CDATA['."\n".
+                                          &Apache::loncommon::check_uncheck_jscript()."\n".
+                                          '// ]]>'."\n".
+                                          '</script>'."\n");
+                                $got_check_uncheck = 1;
+                            }
                         } elsif ($item eq 'selfcreation') {
                             if (ref($values) eq 'HASH') {
                                 $settings = $values->{'usercreation'};
@@ -769,6 +785,9 @@ sub display_settings {
         }
         $r->print('</form>');
     }
+    if ($container) {
+        &Apache::lonparmset::endSettingsScreen($r);
+    }
     $r->print(&Apache::loncommon::end_page());
     return;
 }
@@ -831,6 +850,9 @@ sub display_choices {
     $r->print('</div><div style="padding:0;clear:both;margin:0;border:0"></div>');
     $r->print(&print_footer($r,$phase,'display','Display',undef,$container,$parm_permission));
     $r->print('</form>');
+    if ($container) {
+        &Apache::lonparmset::endSettingsScreen($r);
+    }
     $r->print(&Apache::loncommon::end_page());
     return;
 }
@@ -1100,10 +1122,14 @@ sub ltitools_toggle_js {
 function toggleLTITools(form,setting,item) {
     var radioname = '';
     var divid = '';
-    if ((setting == 'passback') || (setting == 'roster') || (setting == 'returnurl')) {
+    var defdivid = '';
+    if ((setting == 'passback') || (setting == 'roster') || (setting == 'returnurl') || (setting == 'desturl')) {
         radioname = 'ltitools_'+setting+'_'+item;
-        if (setting == 'returnurl') {
+        if ((setting == 'returnurl') || (setting == 'desturl')) {
             divid = 'ltitools_course'+setting+'_'+item;
+            if (setting == 'desturl') {
+                defdivid = 'ltitools_default'+setting+'_'+item;
+            }
         } else {
             divid = 'ltitools_'+setting+'time_'+item;
         }
@@ -1115,6 +1141,9 @@ function toggleLTITools(form,setting,ite
                     if (form.elements[radioname][i].value == '1') {
                         if (document.getElementById(divid)) {
                             document.getElementById(divid).style.display = 'inline-block';
+                            if ((setting == 'desturl') && (document.getElementById(defdivid))) {
+                                document.getElementById(defdivid).style.display = 'inline-block';
+                            }
                         }
                         setvis = 1;
                     }
@@ -1126,6 +1155,9 @@ function toggleLTITools(form,setting,ite
             if (document.getElementById(divid)) {
                 document.getElementById(divid).style.display = 'none';
             }
+            if ((setting == 'desturl') && (document.getElementById(defdivid))) {
+                document.getElementById(defdivid).style.display = 'none';
+            }
         }
     }
     if (setting == 'user') {