|
version 1.291, 2013/08/16 13:13:52
|
version 1.293, 2014/01/08 16:59:54
|
|
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 2466 sub update_session_roles {
|
Line 2467 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) { |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonroles.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / auth