Diff for /loncom/auth/lonroles.pm between versions 1.352 and 1.356

version 1.352, 2021/10/26 14:25:09 version 1.356, 2021/11/19 19:19:35
Line 158  sub start_loading_course { Line 158  sub start_loading_course {
     my $brcrum = [{'href' => '',      my $brcrum = [{'href' => '',
                    'text' => $title},];                     'text' => $title},];
     my $start_page = &Apache::loncommon::start_page($title,undef,      my $start_page = &Apache::loncommon::start_page($title,undef,
                                                     {'bread_crumbs' => $brcrum,});                                                      {'bread_crumbs' => $brcrum,
                                                        'bread_crumbs_nomenu' => 1,
                                                        'links_disabled' => 1});
     $r->print(<<ENDREDIR);      $r->print(<<ENDREDIR);
 $start_page  $start_page
 <script type="text/javascript">  <script type="text/javascript">
 // <![CDATA[  // <![CDATA[
 $swinfo  $swinfo
   
   document.body.addEventListener('click', function (event) {
     // filter out clicks on any other elements
     if (event.target.nodeName == 'A' && event.target.getAttribute('aria-disabled') == 'true') {
       event.preventDefault();
     }
   });
 // ]]>  // ]]>
 </script>  </script>
 ENDREDIR  ENDREDIR
Line 172  ENDREDIR Line 181  ENDREDIR
   
 sub finish_loading_course {  sub finish_loading_course {
     my ($r,$msg,$url) = @_;      my ($r,$msg,$url) = @_;
 #FIXME add continue link, and add jquery to enable menu links when page is loaded      my $link = '<div id="LC_course_loaded" style="display:none"><a href="'.$url.'">'.&mt('Continue').'</a></div>';
     my $link;  
     my $end_page = &Apache::loncommon::end_page();      my $end_page = &Apache::loncommon::end_page();
     my $js_url = &js_escape($url);      my $js_url = &js_escape($url);
     $r->print(<<END);      $r->print(<<END);
Line 181  $msg Line 189  $msg
 <script type="text/javascript">  <script type="text/javascript">
 // <![CDATA[  // <![CDATA[
 \$(document).ready(function() {  \$(document).ready(function() {
       \$("#LC_course_loaded").css("display","block");
       \$('.isDisabled > a').removeAttr("aria-disabled");
       \$('.isDisabled').removeClass("isDisabled");
     var url = "$js_url";      var url = "$js_url";
     \$(location).attr('href',url);      \$(location).attr('href',url);
 });  });
Line 912  ENDCLOSE Line 923  ENDCLOSE
                                                 $dest .= (($dest =~/\?/)? '&':'?').'symb='.$esc_symb;                                                  $dest .= (($dest =~/\?/)? '&':'?').'symb='.$esc_symb;
                                             }                                              }
                                         }                                          }
                                           if ($env{'form.ttoken'}) {
                                               $dest .= (($dest =~/\?/)? '&':'?').'ttoken='.$env{'form.ttoken'};
                                           }
                                         unless ($env{'request.lti.login'}) {                                          unless ($env{'request.lti.login'}) {
                                             $msg = '<p>'.&mt('Entering [_1] ...',                                              $msg = '<p>'.&mt('Entering [_1] ...',
                                                              $env{'course.'.$cdom.'_'.$cnum.'.description'}).                                                               $env{'course.'.$cdom.'_'.$cnum.'.description'}).
Line 1054  ENDCLOSE Line 1068  ENDCLOSE
         $recent = &mt('Recent Courses');          $recent = &mt('Recent Courses');
         $standby = &mt('Course selected. Please stand by.');          $standby = &mt('Course selected. Please stand by.');
     }      }
       if (($norolelist) && ((split(/:/,$env{'user.error.msg'}))[2])) {
           $crumbtext = 'Access Denied';
           $pagetitle = 'Unauthorized';
       }
     my $brcrum =[{href=>"/adm/roles",text=>$crumbtext}];      my $brcrum =[{href=>"/adm/roles",text=>$crumbtext}];
   
     my %roles_in_env;      my %roles_in_env;
Line 1090  ENDCLOSE Line 1108  ENDCLOSE
         $start_page=&Apache::loncommon::start_page($pagetitle,undef,          $start_page=&Apache::loncommon::start_page($pagetitle,undef,
                                                   {bread_crumbs=>$brcrum,crstype=>'Placement'});                                                    {bread_crumbs=>$brcrum,crstype=>'Placement'});
     } else {      } else {
         $funcs = &get_roles_functions($showcount,$cattype);  
         my $crumbsright;          my $crumbsright;
         if ($env{'browser.mobile'}) {          unless (($norolelist) && ((split(/:/,$env{'user.error.msg'}))[2])) {
             $crumbsright = $funcs;              $funcs = &get_roles_functions($showcount,$cattype);
             undef($funcs);              if ($env{'browser.mobile'}) {
                   $crumbsright = $funcs;
                   undef($funcs);
               }
         }          }
         $start_page=&Apache::loncommon::start_page($pagetitle,undef,{bread_crumbs=>$brcrum,          $start_page=&Apache::loncommon::start_page($pagetitle,undef,{bread_crumbs=>$brcrum,
                                                                      bread_crumbs_component=>$crumbsright});                                                                       bread_crumbs_component=>$crumbsright});
Line 1202  ENDHEADER Line 1222  ENDHEADER
     }      }
     if ($nochoose) {      if ($nochoose) {
  $r->print("<h2>".&mt('Sorry ...')."</h2>\n<span class='LC_error'>".   $r->print("<h2>".&mt('Sorry ...')."</h2>\n<span class='LC_error'>".
   &mt('This action is currently not authorized.').'</span>'.    &mt('This action is currently not authorized.').'</span>');
   &Apache::loncommon::end_page());          if ($error && $norolelist) {
               $r->print('<br /><br /><h4><span class="LC_error">'.
                         &mt('As your session was launched from a web page external to LON-CAPA some course content may be unavailable, including the resource you were trying to access.').
                        '</span></h4>'.
                        '<h4><span class="LC_error">'.
                        &mt('You may need to login to LON-CAPA directly, or re-launch from a different external system.').
                        '</span></h4>');
           }
           $r->print(&Apache::loncommon::end_page());
  return OK;   return OK;
     } else {      } else {
         if ($updateresult || $reqauthor || $hotlist) {          if ($updateresult || $reqauthor || $hotlist) {

Removed from v.1.352  
changed lines
  Added in v.1.356


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