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

Diff for /loncom/interface/lonconfigsettings.pm between versions 1.40 and 1.42

version 1.40, 2017/11/30 15:15:15 version 1.42, 2018/03/23 01:01:21
Line 218  $jscript Line 218  $jscript
             if (grep(/^lti$/,@actions)) {              if (grep(/^lti$/,@actions)) {
                 $onload .= "toggleLTI(document.display,'user','add');".                  $onload .= "toggleLTI(document.display,'user','add');".
                            "toggleLTI(document.display,'crs','add');".                             "toggleLTI(document.display,'crs','add');".
                            "toggleLTI(document.display,'sec','add');";                             "toggleLTI(document.display,'sec','add');".
                              "toggleLTI(document.display,'lcauth','add');";
                 if (ref($values) eq 'HASH') {                  if (ref($values) eq 'HASH') {
                     if (ref($values->{'lti'}) eq 'HASH') {                      if (ref($values->{'lti'}) eq 'HASH') {
                         my $numlti = scalar(keys(%{$values->{'lti'}}));                          my $numlti = scalar(keys(%{$values->{'lti'}}));
                         for (my $i=0; $i<$numlti; $i++) {                          for (my $i=0; $i<$numlti; $i++) {
                             $onload .= "toggleLTI(document.display,'user','$i');".                              $onload .= "toggleLTI(document.display,'user','$i');".
                                        "toggleLTI(document.display,'crs','$i');".                                         "toggleLTI(document.display,'crs','$i');".
                                        "toggleLTI(document.display,'sec','$i');";                                         "toggleLTI(document.display,'sec','$i');".
                                          "toggleLTI(document.display,'lcauth','$i');";
                         }                          }
                     }                      }
                 }                   }
             }              }
             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,'user','add');";
                 if (ref($values) eq 'HASH') {                  if (ref($values) eq 'HASH') {
                     if (ref($values->{'ltitools'}) eq 'HASH') {                      if (ref($values->{'ltitools'}) eq 'HASH') {
                         my $numltitools = scalar(keys(%{$values->{'ltitools'}}));                          my $numltitools = scalar(keys(%{$values->{'ltitools'}}));
                         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,'user','$i');";
                         }                          }
                     }                      }
                 }                  }
Removed from v.1.40  
changed lines
  Added in v.1.42

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