|
version 1.143, 2006/01/03 17:46:35
|
version 1.144, 2006/01/06 21:03:23
|
|
Line 1029 sub set_privileges {
|
Line 1029 sub set_privileges {
|
| sub courseloadpage { |
sub courseloadpage { |
| my ($courseid) = @_; |
my ($courseid) = @_; |
| my $startpage; |
my $startpage; |
| my %entry_settings = |
my %entry_settings = &Apache::lonnet::get('nohist_whatsnew', |
| &Apache::lonnet::dump('nohist_whatsnew',$env{'user.domain'}, |
[$courseid.':courseinit']); |
| $env{'user.name'},$courseid.':courseinit'); |
|
| my ($tmp) = %entry_settings; |
my ($tmp) = %entry_settings; |
| unless ($tmp =~ /^Error/) { |
unless ($tmp =~ /^error: 2 /) { |
| $startpage = $entry_settings{$courseid.':courseinit'}; |
$startpage = $entry_settings{$courseid.':courseinit'}; |
| } |
} |
| if ($startpage eq '') { |
if ($startpage eq '') { |
![[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