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

Diff for /loncom/auth/lonroles.pm between versions 1.291 and 1.295

version 1.291, 2013/08/16 13:13:52 version 1.295, 2014/01/15 14:46:21
Line 545  ENDENTERKEY Line 545  ENDENTERKEY
                             }                              }
                         }                          }
  if (($env{'form.orgurl'}) &&    if (($env{'form.orgurl'}) && 
     ($env{'form.orgurl'}!~/^\/adm\/flip/)) {      ($env{'form.orgurl'}!~/^\/adm\/flip/) &&
       ($env{'form.orgurl'} ne '/adm/roles')) {
     my $dest=$env{'form.orgurl'};      my $dest=$env{'form.orgurl'};
                             if ($env{'form.symb'}) {                              if ($env{'form.symb'}) {
                                 if ($dest =~ /\?/) {                                  if ($dest =~ /\?/) {
                                     $dest .= '&';                                      $dest .= '&';
                                 } else {                                  } else {
                                     $dest .= '?'                                      $dest .= '?';
                                 }                                  }
                                 $dest .= 'symb='.$env{'form.symb'};                                  $dest .= 'symb='.$env{'form.symb'};
                             }                              }
Line 888  ENDHEADER Line 889  ENDHEADER
             my $esc_dom = &HTML::Entities::encode($env{'user.domain'},'"<>&');               my $esc_dom = &HTML::Entities::encode($env{'user.domain'},'"<>&'); 
             $r->print(              $r->print(
                 '<p>'                  '<p>'
                .&mt('[_1]Visit the [_2]Course/Community Catalog[_3]'                 .&mt('[_1]Visit the [_2]Course/Community Catalog[_3][_4]'
                    .' to view all [_4] LON-CAPA courses and communities.'                     .' to view all [_5] LON-CAPA courses and communities.'
                    ,'<b>'                     ,'<b>'
                    ,'<a href="/adm/coursecatalog?showdom='.$esc_dom.'">'                     ,'<a href="/adm/coursecatalog?showdom='.$esc_dom.'">'
                    ,'</a></b>',$domdesc)                     ,'</a>'
                      ,'</b>'
                      ,'"'.$domdesc.'"')
                .'<br />'                 .'<br />'
                .&mt('If a course or community is [_1]not[_2] in your list of current courses and communities below,'                 .&mt('If a course or community is [_1]not[_2] in your list of current courses and communities below,'
                    .' you may be able to enroll if self-enrollment is permitted.'                     .' you may be able to enroll if self-enrollment is permitted.'
Line 2466  sub update_session_roles { Line 2469  sub update_session_roles {
                 if ($desc) {                  if ($desc) {
                     $newmsg .= '<li>'.                      $newmsg .= '<li>'.
                                &mt('[_1] with status: [_2].',                                 &mt('[_1] with status: [_2].',
                                $desc,$newrole{$item}).'</li>';                                 $desc,&mt($newrole{$item})).'</li>';
                 }                  }
             }              }
             if ($newmsg) {              if ($newmsg) {
Line 2809  sub get_queued { Line 2812  sub get_queued {
             if (($status eq 'approval') || ($status eq 'approved')) {              if (($status eq 'approval') || ($status eq 'approved')) {
                 $output .= '<p><b>'.&mt('Author role request').'</b><br />';                  $output .= '<p><b>'.&mt('Author role request').'</b><br />';
                 if ($status eq 'approval') {                  if ($status eq 'approval') {
                     $output .= &mt('A request for authoring space submitted on [_1] is awaiting approval',                      $output .= &mt('A request for Authoring Space submitted on [_1] is awaiting approval',
                                   &Apache::lonlocal::locallocaltime($timestamp));                                    &Apache::lonlocal::locallocaltime($timestamp));
                 } elsif ($status eq 'approved') {                  } elsif ($status eq 'approved') {
                     my %roleshash =                      my %roleshash =
Removed from v.1.291  
changed lines
  Added in v.1.295

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