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

Diff for /loncom/auth/lonroles.pm between versions 1.354 and 1.355

version 1.354, 2021/11/15 22:36:38 version 1.355, 2021/11/16 05:20:02
Line 1068  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 1104  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;          unless (($norolelist) && ((split(/:/,$env{'user.error.msg'}))[2])) {
         if ($env{'browser.mobile'}) {              $funcs = &get_roles_functions($showcount,$cattype);
             $crumbsright = $funcs;              if ($env{'browser.mobile'}) {
             undef($funcs);                  $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 1216  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.354  
changed lines
  Added in v.1.355

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