version 1.254.2.4, 2019/08/13 03:09:48
|
version 1.254.2.7, 2024/12/29 21:44:16
|
Line 267 sub display_directory_line {
|
Line 267 sub display_directory_line {
|
|
|
sub display_directory { |
sub display_directory { |
my ($r,$url,$current_path,$is_empty,$dir_list,$group,$can_upload, |
my ($r,$url,$current_path,$is_empty,$dir_list,$group,$can_upload, |
$can_modify,$can_delete,$can_setacl)=@_; |
$can_modify,$can_delete,$can_setacl,$caller)=@_; |
my $iconpath= $r->dir_config('lonIconsURL') . "/"; |
my $iconpath= $r->dir_config('lonIconsURL') . "/"; |
my $select_mode; |
my $select_mode; |
my $checked_files; |
my $checked_files; |
Line 311 sub display_directory {
|
Line 311 sub display_directory {
|
&mt('Using the portfolio file list')) |
&mt('Using the portfolio file list')) |
.'</p>' |
.'</p>' |
); |
); |
|
my ($acl_helpfile,$acl_helplink); |
|
if ($caller eq 'coursegrp_portfolio') { |
|
$acl_helpfile = 'Portfolio ShareFile Group'; |
|
} elsif ($can_setacl) { |
|
$acl_helpfile = 'Portfolio ShareFile'; |
|
} |
|
if ($acl_helpfile) { |
|
$acl_helplink = &Apache::loncommon::help_open_topic($acl_helpfile); |
|
} |
$r->print(&Apache::loncommon::start_data_table() |
$r->print(&Apache::loncommon::start_data_table() |
.&Apache::loncommon::start_data_table_header_row() |
.&Apache::loncommon::start_data_table_header_row() |
.'<th colspan="2">'.&mt('Actions'). &Apache::loncommon::help_open_topic('Portfolio FileAction').'</th>' |
.'<th colspan="2">'.&mt('Actions'). &Apache::loncommon::help_open_topic('Portfolio FileAction').'</th>' |
Line 320 sub display_directory {
|
Line 329 sub display_directory {
|
.'<th>'.&mt('Size').'</th>' |
.'<th>'.&mt('Size').'</th>' |
.'<th>'.&mt('Last Modified').'</th>' |
.'<th>'.&mt('Last Modified').'</th>' |
.'<th> </th>' |
.'<th> </th>' |
.'<th>'.&mt('Current Access Status').&Apache::loncommon::help_open_topic('Portfolio ShareFile').'</th>' |
.'<th>'.&mt('Current Access Status').$acl_helplink.'</th>' |
.&Apache::loncommon::end_data_table_header_row()); |
.&Apache::loncommon::end_data_table_header_row()); |
} |
} |
|
|
Line 909 sub display_access {
|
Line 918 sub display_access {
|
$info .= '</li><li>'.&mt('Passphrase-protected files do not require log-in, but will require the viewer to enter the passphrase you set.'); |
$info .= '</li><li>'.&mt('Passphrase-protected files do not require log-in, but will require the viewer to enter the passphrase you set.'); |
$info .= '</li><li>'.&explain_conditionals(); |
$info .= '</li><li>'.&explain_conditionals(); |
$info .= '</li></ul>'. |
$info .= '</li></ul>'. |
&mt('A listing of files viewable without log-in is available at: ')."<a href=\"/adm/$udom/$uname/aboutme/portfolio\">".&Apache::lonnet::absolute_url($ENV{'SERVER_NAME'})."/adm/$udom/$uname/aboutme/portfolio</a>.<br />"; |
&mt('A listing of files viewable without log-in is available at: ')."<a href=\"/adm/$udom/$uname/aboutme/portfolio\">".&Apache::lonnet::absolute_url()."/adm/$udom/$uname/aboutme/portfolio</a>.<br />"; |
if ($group eq '') { |
if ($group eq '') { |
$info .= &mt("For logged in users a 'Display file listing' link will also appear (when there are viewable files) on your personal information page:"); |
$info .= &mt("For logged in users a 'Display file listing' link will also appear (when there are viewable files) on your personal information page:"); |
} else { |
} else { |
$info .= &mt("For logged in users a 'Display file listing' link will also appear (when there are viewable files) on the course information page:"); |
$info .= &mt("For logged in users a 'Display file listing' link will also appear (when there are viewable files) on the course information page:"); |
} |
} |
$info .= "<br /><a href=\"/adm/$udom/$uname/aboutme\">".&Apache::lonnet::absolute_url($ENV{'SERVER_NAME'})."/adm/$udom/$uname/aboutme</a><br />"; |
$info .= "<br /><a href=\"/adm/$udom/$uname/aboutme\">".&Apache::lonnet::absolute_url()."/adm/$udom/$uname/aboutme</a><br />"; |
if ($group ne '') { |
if ($group ne '') { |
$info .= &mt("Users with course editing rights may add a 'Group Portfolio' item using the Course Editor (Collaboration tab), to provide access to viewable group portfolio files.").'<br />'; |
$info .= &mt("Users with course editing rights may add a 'Group Portfolio' item using the Course Editor (Collaboration tab), to provide access to viewable group portfolio files.").'<br />'; |
} |
} |
Line 2549 sub coursegrp_portfolio_header {
|
Line 2558 sub coursegrp_portfolio_header {
|
} |
} |
&Apache::lonhtmlcommon::add_breadcrumb |
&Apache::lonhtmlcommon::add_breadcrumb |
({href=>"/adm/$cdom/$cnum/$env{'form.group'}/smppg?ref=$env{'form.ref'}", |
({href=>"/adm/$cdom/$cnum/$env{'form.group'}/smppg?ref=$env{'form.ref'}", |
text=>"$ucgpterm: $grp_desc", |
text=>&mt('Group').": $grp_desc", |
title=>"Go to group's home page"}, |
title=>&mt("Go to group's home page"), |
|
no_mt=>1}, |
{href=>"/adm/coursegrp_portfolio?".&group_args(), |
{href=>"/adm/coursegrp_portfolio?".&group_args(), |
text=>"Group Portfolio", |
text=>"Group Portfolio", |
title=>"Display group portfolio"}); |
title=>"Display group portfolio"}); |
my $output = &Apache::lonhtmlcommon::breadcrumbs( |
my $output = &Apache::lonhtmlcommon::breadcrumbs( |
&mt('[_1] portfolio files - [_2]',$gpterm,$grp_desc)); |
&mt('Group portfolio files - [_1]',$grp_desc), |
|
undef,undef,undef,undef,1); |
return $output; |
return $output; |
} |
} |
|
|
Line 2767 sub handler {
|
Line 2778 sub handler {
|
} |
} |
$r->rflush(); |
$r->rflush(); |
# Check if access to portfolio is blocked by one or more blocking events in courses. |
# Check if access to portfolio is blocked by one or more blocking events in courses. |
|
my $clientip = &Apache::lonnet::get_requestor_ip($r); |
my ($blocked,$blocktext) = |
my ($blocked,$blocktext) = |
&Apache::loncommon::blocking_status('port',$uname,$udom); |
&Apache::loncommon::blocking_status('port',$clientip,$uname,$udom); |
if ($blocked) { |
if ($blocked) { |
my $evade_block; |
my $evade_block; |
# If portfolio display is in a window popped up from a "Select Portfolio Files" |
# If portfolio display is in a window popped up from a "Select Portfolio Files" |
Line 2988 sub handler {
|
Line 3000 sub handler {
|
&display_common($r,$url,$current_path,$is_empty,$dirlistref, |
&display_common($r,$url,$current_path,$is_empty,$dirlistref, |
$can_upload,$group); |
$can_upload,$group); |
&display_directory($r,$url,$current_path,$is_empty,$dirlistref,$group, |
&display_directory($r,$url,$current_path,$is_empty,$dirlistref,$group, |
$can_upload,$can_modify,$can_delete,$can_setacl); |
$can_upload,$can_modify,$can_delete,$can_setacl, |
|
$caller); |
} |
} |
$r->print(&Apache::loncommon::end_page()); |
$r->print(&Apache::loncommon::end_page()); |
return OK; |
return OK; |