|
version 1.1396, 2022/11/16 14:24:35
|
version 1.1398, 2022/11/24 00:49:48
|
|
Line 4283 sub syllabuswrapper {
|
Line 4283 sub syllabuswrapper {
|
| return qq{<a href="/public/$domain/$coursedir/syllabus">$linktext</a>}; |
return qq{<a href="/public/$domain/$coursedir/syllabus">$linktext</a>}; |
| } |
} |
| |
|
| |
# ----------------------------------------------------------------------------- |
| |
|
| sub aboutme_on { |
sub aboutme_on { |
| my ($uname,$udom)=@_; |
my ($uname,$udom)=@_; |
| unless ($uname) { $uname=$env{'user.name'}; } |
unless ($uname) { $uname=$env{'user.name'}; } |
|
Line 4307 sub devalidate_aboutme_cache {
|
Line 4309 sub devalidate_aboutme_cache {
|
| &Apache::lonnet::devalidate_cache_new('aboutme',$id); |
&Apache::lonnet::devalidate_cache_new('aboutme',$id); |
| } |
} |
| |
|
| # ----------------------------------------------------------------------------- |
|
| |
|
| sub track_student_link { |
sub track_student_link { |
| my ($linktext,$sname,$sdom,$target,$start,$only_body) = @_; |
my ($linktext,$sname,$sdom,$target,$start,$only_body) = @_; |
| my $link ="/adm/trackstudent?"; |
my $link ="/adm/trackstudent?"; |
|
Line 16445 sub commit_studentrole {
|
Line 16445 sub commit_studentrole {
|
| } |
} |
| $oldsecurl = $uurl; |
$oldsecurl = $uurl; |
| $expire_role_result = |
$expire_role_result = |
| &Apache::lonnet::assignrole($udom,$uname,$uurl,'st',$now,'','',$context); |
&Apache::lonnet::assignrole($udom,$uname,$uurl,'st',$now,'','','',$context); |
| if ($env{'request.course.sec'} ne '') { |
if ($env{'request.course.sec'} ne '') { |
| if ($expire_role_result eq 'refused') { |
if ($expire_role_result eq 'refused') { |
| my @roles = ('st'); |
my @roles = ('st'); |
![[BACK]](/icons/back.gif){kind=icon}
Return to loncommon.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface