version 1.76, 2008/12/02 23:35:21
|
version 1.78, 2008/12/09 10:45:44
|
Line 108 sub handler {
|
Line 108 sub handler {
|
$is_course = &Apache::lonnet::is_course($cdom,$cnum); |
$is_course = &Apache::lonnet::is_course($cdom,$cnum); |
} |
} |
|
|
|
my $candisplay = 1; |
|
if (!$is_course) { |
|
$candisplay = &Apache::lonnet::usertools_access($cnum,$cdom,'aboutme'); |
|
if ((!$candisplay) && ($env{'request.course.id'})) { |
|
$candisplay = &aboutme_access($cnum,$cdom); |
|
} |
|
if (!$candisplay) { |
|
if ($target eq 'tex') { |
|
$r->print('\noindent{\large\textbf{'.&mt('No user home page available').'}}\\\\\\\\'); |
|
} else { |
|
$r->print(&Apache::loncommon::start_page("Personal Information")); |
|
$r->print('<h2>'.&mt('No user home page available') .'</h2>'. |
|
&mt('This is a result of one of the following:').'<ul>'. |
|
'<li>'.&mt('The administrator of this domain has disabled home page functionality for this specific user.').'</li>'. |
|
'<li>'.&mt('The domain has been configured to disable, by default, home page functionality for all users in the domain.').'</li>'. |
|
'</ul>'); |
|
$r->print(&Apache::loncommon::end_page()); |
|
} |
|
return OK; |
|
} |
|
} |
|
|
# --------------------------------------------------------- The syllabus fields |
# --------------------------------------------------------- The syllabus fields |
my %syllabusfields=&Apache::lonlocal::texthash( |
my %syllabusfields=&Apache::lonlocal::texthash( |
'aaa_contactinfo' => 'Contact Information', |
'aaa_contactinfo' => 'Contact Information', |
Line 269 my $image;
|
Line 291 my $image;
|
'</form><form method="post">'); |
'</form><form method="post">'); |
|
|
} |
} |
|
&Apache::lontemplate::start_columnSection($r); |
&Apache::lontemplate::print_content_template($r,$allowed,$target,\%syllabusfields,\%syllabus); |
&Apache::lontemplate::print_content_template($r,$allowed,$target,\%syllabusfields,\%syllabus); |
if($target ne 'tex') |
if($target ne 'tex') |
{ |
{ |
|
&Apache::lontemplate::print_image($r,$image); |
&print_portfiles_link($r,$is_course); |
&print_portfiles_link($r,$is_course); |
$r->print('<div class="ContentBox">'); |
|
$r->print($image); |
|
$r->print('</div>'); |
|
$r->print('</div>'); |
$r->print('</div>'); |
$r->print('<p>'); |
$r->print('<p>'); |
|
|
Line 336 my $image;
|
Line 356 my $image;
|
$r->print('<p><a href="javascript:window.close()">'.&mt('Close window').'</a>'); |
$r->print('<p><a href="javascript:window.close()">'.&mt('Close window').'</a>'); |
} |
} |
$r->print('<br />'.&mt('Last updated').': '.$lastmod); |
$r->print('<br />'.&mt('Last updated').': '.$lastmod); |
|
&Apache::lontemplate::end_columnSection($r); |
$r->print(&Apache::loncommon::end_page()); |
$r->print(&Apache::loncommon::end_page()); |
} else { |
} else { |
$r->print('\end{document}'); |
$r->print('\end{document}'); |
Line 728 sub parse_directory {
|
Line 748 sub parse_directory {
|
return $output; |
return $output; |
} |
} |
|
|
|
sub aboutme_access { |
|
my ($uname,$udom) = @_; |
|
my $privcheck = $env{'request.course.id'}; |
|
my $sec; |
|
if ($env{'request.course.sec'} ne '') { |
|
$sec = $env{'request.course.sec'}; |
|
$privcheck .= '/'.$sec; |
|
} |
|
my $cdom = $env{'course.'.$env{'request.course.id'}.'.domain'}; |
|
my $cnum = $env{'course.'.$env{'request.course.id'}.'.num'}; |
|
if (($cdom eq '') || ($cnum eq '')) { |
|
my %coursehash = &coursedescription($env{'request.course.id'}); |
|
$cdom = $coursehash{'domain'}; |
|
$cnum = $coursehash{'cnum'}; |
|
} |
|
if ((&allowed('srm',$privcheck)) || (&allowed('dff',$privcheck))) { |
|
if (&in_course($uname,$udom,$cnum,$cdom)) { |
|
return 1; |
|
} |
|
} |
|
return; |
|
} |
|
|
1; |
1; |
__END__ |
__END__ |