version 1.108, 2009/03/02 22:32:19
|
version 1.113, 2009/03/20 10:05:08
|
Line 118 sub handler {
|
Line 118 sub handler {
|
} |
} |
if (!$candisplay) { |
if (!$candisplay) { |
if ($target eq 'tex') { |
if ($target eq 'tex') { |
$r->print('\noindent{\large\textbf{'.&mt('No user home page available').'}}\\\\\\\\'); |
$r->print('\noindent{\large\textbf{'.&mt('No user personal information page available').'}}\\\\\\\\'); |
} else { |
} else { |
$r->print(&Apache::loncommon::start_page("Personal Information Page")); |
$r->print(&Apache::loncommon::start_page("Personal Information Page")); |
$r->print('<h2>'.&mt('No user home page available') .'</h2>'. |
$r->print('<h2>'.&mt('No user personal information page available') .'</h2>'. |
&mt('This is a result of one of the following:').'<ul>'. |
&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 administrator of this domain has disabled personal information 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>'. |
'<li>'.&mt('The domain has been configured to disable, by default, personal information page functionality for all users in the domain.').'</li>'. |
'</ul>'); |
'</ul>'); |
$r->print(&Apache::loncommon::end_page()); |
$r->print(&Apache::loncommon::end_page()); |
} |
} |
Line 179 sub handler {
|
Line 179 sub handler {
|
'force_register' => $env{'forceregister'}, |
'force_register' => $env{'forceregister'}, |
'bread_crumbs' => $brcrum}); |
'bread_crumbs' => $brcrum}); |
$r->print($start_page); |
$r->print($start_page); |
$r->print('<h2>'.&mt('Group files').'</h2>'); |
$r->print('<h2>'.&mt('Group Portfolio').'</h2>'); |
&print_portfiles_link($r,$is_course); |
&print_portfiles_link($r,$is_course); |
$r->print(&Apache::loncommon::end_page()); |
$r->print(&Apache::loncommon::end_page()); |
} |
} |
Line 361 my $image;
|
Line 361 my $image;
|
if($target ne 'tex')#Begin Print RSS and portfiles |
if($target ne 'tex')#Begin Print RSS and portfiles |
{ |
{ |
&print_portfiles_link($r,$is_course); |
&print_portfiles_link($r,$is_course); |
if(&Apache::lonrss::advertisefeeds($cnum,$cdom) ne ''){ |
if(&Apache::lonrss::advertisefeeds($cnum,$cdom) ne ''){ |
&Apache::lontemplate::print_template($r,'RSS Feeds and Blogs',&Apache::lonrss::advertisefeeds($cnum,$cdom),1,'LC_ContentBoxSpecial'); |
&Apache::lontemplate::print_start_template($r,'RSS Feeds and Blogs','LC_ContentBoxSpecial'); |
|
$r->print(&Apache::lonrss::advertisefeeds($cnum,$cdom)); |
|
&Apache::lontemplate::print_end_template($r); |
} |
} |
|
|
} #End Print RSS and portfiles |
} #End Print RSS and portfiles |
Line 388 my $image;
|
Line 390 my $image;
|
if ($env{'request.course.id'} |
if ($env{'request.course.id'} |
&& &Apache::lonnet::allowed('srm',$env{'request.course.id'}) |
&& &Apache::lonnet::allowed('srm',$env{'request.course.id'}) |
&& &in_course($cdom,$cnum)) { |
&& &in_course($cdom,$cnum)) { |
if ($target ne 'tex') { |
if ($target ne 'tex') { |
$r->print('<a name="coursecomment" />'); |
&Apache::lontemplate::print_start_template($r,&mt('User Notes, Records of Face-To-Face Discussions, and Critical Messages in Course'),'LC_ContentBoxSpecial'); |
&Apache::lontemplate::print_start_template($r,&mt('User Notes, Records of Face-To-Face Discussions, and Critical Messages in Course').&mt('Shared by course faculty and staff').&Apache::loncommon::help_open_topic("Course_Face_To_Face_Records,Course_Critical_Message"),'LC_ContentBoxSpecial'); |
$r->print('<div style="padding-left: 20px">'); |
|
$r->print('<p>'); |
|
$r->print(&mt('Shared by course faculty and staff').&Apache::loncommon::help_open_topic("Course_Face_To_Face_Records,Course_Critical_Message")); |
|
$r->print('</p>'); |
&Apache::lonmsgdisplay::disfacetoface($r,$cnum,$cdom); |
&Apache::lonmsgdisplay::disfacetoface($r,$cnum,$cdom); |
|
$r->print('</div>'); |
&Apache::lontemplate::print_end_template($r); |
&Apache::lontemplate::print_end_template($r); |
|
|
} else { |
} else { |
Line 460 sub print_portfiles_link {
|
Line 466 sub print_portfiles_link {
|
my $query_string = &build_query_string(); |
my $query_string = &build_query_string(); |
my $output; |
my $output; |
my %lt = &Apache::lonlocal::texthash( |
my %lt = &Apache::lonlocal::texthash( |
vpfi => 'Viewable portfolio files', |
'vpfi' => 'Viewable portfolio files', |
vgpf => 'Viewable group portfolio files', |
'vgpf' => 'Viewable group portfolio files', |
difl => 'Display file listing', |
'difl' => 'Display file listing', |
); |
); |
if ($filecounts->{'both'} > 0) { |
if ($filecounts->{'both'} > 0) { |
$output = '<div class="LC_ContentBoxSpecial"><h4 class="LC_hcell">'; |
$output = '<div class="LC_ContentBoxSpecial"><h4 class="LC_hcell">'; |
$output .= ($is_course?$lt{'vgpf'}:$lt{'vpfi'}).'</h4>'; |
$output .= ($is_course?$lt{'vgpf'}:$lt{'vpfi'}).'</h4>'; |
Line 569 sub display_portfolio_header {
|
Line 575 sub display_portfolio_header {
|
sub display_portfolio_files { |
sub display_portfolio_files { |
my ($r,$is_course) = @_; |
my ($r,$is_course) = @_; |
my ($cdom,$cnum,$name) = &aboutme_info($r,$is_course); |
my ($cdom,$cnum,$name) = &aboutme_info($r,$is_course); |
my %lt = ( withoutpass => 'passphrase not required', |
my %lt = &Apache::lonlocal::texthash( |
withpass => 'passphrase protected', |
'withoutpass' => 'passphrase not required', |
both => 'all access types ',); |
'withpass' => 'passphrase protected', |
%lt = &Apache::lonlocal::texthash(%lt); |
'both' => 'all access types ', |
|
); |
|
|
my $portaccess = 'withoutpass'; |
my $portaccess = 'withoutpass'; |
if (exists($env{'form.portaccess'})) { |
if (exists($env{'form.portaccess'})) { |