version 1.110, 2009/03/08 20:26:33
|
version 1.115, 2009/03/21 22:09:51
|
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 221 sub handler {
|
Line 221 sub handler {
|
|
|
} |
} |
|
|
|
#Print Privacy Note |
|
if ($allowed) { |
|
$r->print('<p class="LC_info">' |
|
.'<b>'.&mt('Privacy Note').':</b> ' |
|
.&mt('The information you submit can be viewed by anybody who is logged into LON-CAPA. Do not provide information that you are not ready to share publicly.') |
|
.'</p>' |
|
); |
|
} |
|
|
#Print Help Text |
#Print Help Text |
if ($target ne 'tex') { |
if ($target ne 'tex') { |
if($allowed){ |
if($allowed){ |
Line 269 else{
|
Line 278 else{
|
|
|
my $query_string; |
my $query_string; |
|
|
if ($allowed) { |
|
$r->print('<p><b>'.&mt('Privacy Note').':</b> '.&mt('The information you submit can be viewed by anybody who is logged into LON-CAPA. Do not provide information that you are not ready to share publicly.'). '</p>'); |
|
} |
|
|
|
|
|
if (($env{'form.uploaddoc.filename'}) && |
if (($env{'form.uploaddoc.filename'}) && |
($env{'form.storeupl'}) && ($allowed)) { |
($env{'form.storeupl'}) && ($allowed)) { |
if ($env{'form.uploaddoc.filename'}=~/\.(gif|jpg|png|jpeg)$/i) { |
if ($env{'form.uploaddoc.filename'}=~/\.(gif|jpg|png|jpeg)$/i) { |
Line 391 my $image;
|
Line 395 my $image;
|
&& &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') { |
&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'); |
&Apache::lontemplate::print_start_template($r,&mt('User Notes, Records of Face-To-Face Discussions, and Critical Messages in Course'),'LC_ContentBoxSpecial'); |
&Apache::lonmsgdisplay::disfacetoface($r,$cnum,$cdom); |
$r->print('<span class="LC_info">'); |
|
$r->print(&mt('Shared by course faculty and staff').&Apache::loncommon::help_open_topic("Course_Face_To_Face_Records,Course_Critical_Message")); |
|
$r->print('</span> <p>'); |
|
&Apache::lonmsgdisplay::disfacetoface($r,$cnum,$cdom); |
|
$r->print('</p>'); |
&Apache::lontemplate::print_end_template($r); |
&Apache::lontemplate::print_end_template($r); |
|
|
} else { |
} else { |
Line 461 sub print_portfiles_link {
|
Line 469 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 570 sub display_portfolio_header {
|
Line 578 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'})) { |