[BACK]Return to lonconfigsettings.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/lonconfigsettings.pm between versions 1.21.4.13.2.11 and 1.75

version 1.21.4.13.2.11, 2023/10/06 21:19:46 version 1.75, 2025/06/14 02:50:25
Line 35  use Apache::lonnet; Line 35  use Apache::lonnet;
 use Apache::loncommon();  use Apache::loncommon();
 use Apache::lonhtmlcommon();  use Apache::lonhtmlcommon();
 use Apache::lonlocal;  use Apache::lonlocal;
   use Apache::lonparmset();
 use Apache::courseclassifier();  use Apache::courseclassifier();
 use LONCAPA qw(:DEFAULT :match);  use LONCAPA qw(:DEFAULT :match);
 use File::Copy;  use File::Copy;
Line 268  $jscript Line 269  $jscript
             if (grep(/^ltitools$/,@actions)) {              if (grep(/^ltitools$/,@actions)) {
                 $onload .= "toggleLTITools(document.display,'passback','add');".                  $onload .= "toggleLTITools(document.display,'passback','add');".
                            "toggleLTITools(document.display,'roster','add');".                             "toggleLTITools(document.display,'roster','add');".
                              "toggleLTITools(document.display,'desturl','add');".
                              "toggleLTITools(document.display,'returnurl','add');".
                            "toggleLTITools(document.display,'user','add');";                             "toggleLTITools(document.display,'user','add');";
                 if (ref($values) eq 'HASH') {                  if (ref($values) eq 'HASH') {
                     if (ref($values->{'ltitools'}) eq 'HASH') {                      if (ref($values->{'ltitools'}) eq 'HASH') {
Line 275  $jscript Line 278  $jscript
                         for (my $i=0; $i<$numltitools; $i++) {                          for (my $i=0; $i<$numltitools; $i++) {
                             $onload .= "toggleLTITools(document.display,'passback','$i');".                              $onload .= "toggleLTITools(document.display,'passback','$i');".
                                        "toggleLTITools(document.display,'roster','$i');".                                         "toggleLTITools(document.display,'roster','$i');".
                                          "toggleLTITools(document.display,'desturl','$i');".
                                          "toggleLTITools(document.display,'returnurl','$i');".
                                        "toggleLTITools(document.display,'user','$i');";                                         "toggleLTITools(document.display,'user','$i');";
                         }                          }
                     }                      }
Line 288  $jscript Line 293  $jscript
             if (grep(/^wafproxy$/,@actions)) {              if (grep(/^wafproxy$/,@actions)) {
                 $onload .= "toggleWAF();checkWAF();updateWAF();";                  $onload .= "toggleWAF();checkWAF();updateWAF();";
             }              }
               if (grep(/^proctoring$/,@actions)) {
                   $onload .= "toggleProctoring(document.display,'proctorio');".
                              "toggleProctoring(document.display,'examity');";
               }
             if (grep(/^scantron$/,@actions)) {              if (grep(/^scantron$/,@actions)) {
                 $onload .= "toggleScantron(document.display);";                  $onload .= "toggleScantron(document.display);";
             }              }
Line 405  $jscript Line 414  $jscript
 <input type="hidden" name="pres_value" />  <input type="hidden" name="pres_value" />
 </form>  </form>
 ');  ');
       if ($container) {
          &Apache::lonparmset::startSettingsScreen($r,$container,$crstype);
       }
     $r->print('<form method="post" name="'.$phase.'" action="'.$action.'"'.      $r->print('<form method="post" name="'.$phase.'" action="'.$action.'"'.
               ' enctype="multipart/form-data">');                ' enctype="multipart/form-data">');
     return;      return;
Line 569  sub print_footer { Line 581  sub print_footer {
     }      }
     if ($phase eq 'process') {      if ($phase eq 'process') {
         $r->print('</form>');          $r->print('</form>');
           if ($container) {
              &Apache::lonparmset::endSettingsScreen($r);
           }
         $r->print(&Apache::loncommon::end_page());          $r->print(&Apache::loncommon::end_page());
     }      }
     return;      return;
Line 645  sub make_changes { Line 660  sub make_changes {
     if ($context eq 'course') {      if ($context eq 'course') {
         $footer_text = 'Back to display/edit settings';           $footer_text = 'Back to display/edit settings'; 
     }      }
     &print_footer($r,$phase,'display',$footer_text,\@actions,$container,$parm_permission);  
     $r->print('</p>');      $r->print('</p>');
       &print_footer($r,$phase,'display',$footer_text,\@actions,$container,$parm_permission);
     return \%lastact;      return \%lastact;
 }  }
   
Line 676  sub display_settings { Line 691  sub display_settings {
                         if (ref($values) eq 'HASH') {                          if (ref($values) eq 'HASH') {
                             $settings = $values->{$item};                              $settings = $values->{$item};
                         }                          }
                         if ($item eq 'usersessions') {                          if (($item eq 'usersessions') || ($item eq 'ssl')) {
                             $r->print('<script type="text/javascript">'."\n".                              unless ($got_check_uncheck) {
                                       '// <![CDATA['."\n".                                  $r->print('<script type="text/javascript">'."\n".
                                       &Apache::loncommon::check_uncheck_jscript()."\n".                                            '// <![CDATA['."\n".
                                       '// ]]>'."\n".                                            &Apache::loncommon::check_uncheck_jscript()."\n".
                                       '</script>'."\n");                                            '// ]]>'."\n".
                                             '</script>'."\n");
                                   $got_check_uncheck = 1;
                               }
                         } elsif ($item eq 'selfcreation') {                          } elsif ($item eq 'selfcreation') {
                             if (ref($values) eq 'HASH') {                              if (ref($values) eq 'HASH') {
                                 $settings = $values->{'usercreation'};                                  $settings = $values->{'usercreation'};
Line 767  sub display_settings { Line 785  sub display_settings {
         }          }
         $r->print('</form>');          $r->print('</form>');
     }      }
       if ($container) {
           &Apache::lonparmset::endSettingsScreen($r);
       }
     $r->print(&Apache::loncommon::end_page());      $r->print(&Apache::loncommon::end_page());
     return;      return;
 }  }
Line 829  sub display_choices { Line 850  sub display_choices {
     $r->print('</div><div style="padding:0;clear:both;margin:0;border:0"></div>');      $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(&print_footer($r,$phase,'display','Display',undef,$container,$parm_permission));
     $r->print('</form>');      $r->print('</form>');
       if ($container) {
           &Apache::lonparmset::endSettingsScreen($r);
       }
     $r->print(&Apache::loncommon::end_page());      $r->print(&Apache::loncommon::end_page());
     return;      return;
 }  }
Line 1098  sub ltitools_toggle_js { Line 1122  sub ltitools_toggle_js {
 function toggleLTITools(form,setting,item) {  function toggleLTITools(form,setting,item) {
     var radioname = '';      var radioname = '';
     var divid = '';      var divid = '';
     if ((setting == 'passback') || (setting == 'roster')) {      var defdivid = '';
       if ((setting == 'passback') || (setting == 'roster') || (setting == 'returnurl') || (setting == 'desturl')) {
         radioname = 'ltitools_'+setting+'_'+item;          radioname = 'ltitools_'+setting+'_'+item;
         divid = 'ltitools_'+setting+'time_'+item;          if ((setting == 'returnurl') || (setting == 'desturl')) {
               divid = 'ltitools_course'+setting+'_'+item;
               if (setting == 'desturl') {
                   defdivid = 'ltitools_default'+setting+'_'+item;
               }
           } else {
               divid = 'ltitools_'+setting+'time_'+item;
           }
         var num = form.elements[radioname].length;          var num = form.elements[radioname].length;
         if (num) {          if (num) {
             var setvis = '';              var setvis = '';
Line 1109  function toggleLTITools(form,setting,ite Line 1141  function toggleLTITools(form,setting,ite
                     if (form.elements[radioname][i].value == '1') {                      if (form.elements[radioname][i].value == '1') {
                         if (document.getElementById(divid)) {                          if (document.getElementById(divid)) {
                             document.getElementById(divid).style.display = 'inline-block';                              document.getElementById(divid).style.display = 'inline-block';
                               if ((setting == 'desturl') && (document.getElementById(defdivid))) {
                                   document.getElementById(defdivid).style.display = 'inline-block';
                               }
                         }                          }
                         setvis = 1;                          setvis = 1;
                     }                      }
Line 1120  function toggleLTITools(form,setting,ite Line 1155  function toggleLTITools(form,setting,ite
             if (document.getElementById(divid)) {              if (document.getElementById(divid)) {
                 document.getElementById(divid).style.display = 'none';                  document.getElementById(divid).style.display = 'none';
             }              }
               if ((setting == 'desturl') && (document.getElementById(defdivid))) {
                   document.getElementById(defdivid).style.display = 'none';
               }
         }          }
     }      }
     if (setting == 'user') {      if (setting == 'user') {
Removed from v.1.21.4.13.2.11  
changed lines
  Added in v.1.75

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>