loncom/interface/portfolio.pm - diff

Return to portfolio.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.270, 2024/09/07 03:22:51	version 1.271, 2024/09/07 19:13:00
Line 315 sub display_directory {	Line 315 sub display_directory {
.'</p>'	.'</p>'
);	);
my ($acl_helpfile,$acl_helplink);	my ($acl_helpfile,$acl_helplink);
if ($can_setacl) {	if ($caller eq 'coursegrp_portfolio') {
$acl_helpfile = 'Portfolio ShareFile';
} elsif ($caller eq 'coursegrp_portfolio') {
$acl_helpfile = 'Portfolio ShareFile Group';	$acl_helpfile = 'Portfolio ShareFile Group';
	} elsif ($can_setacl) {
	$acl_helpfile = 'Portfolio ShareFile';
}	}
unless ($can_setacl \|\| $can_viewacl) {	unless ($can_setacl \|\| $can_viewacl) {
$acl_helpfile = 'Portfolio ShareFile Off';	$acl_helpfile = 'Portfolio ShareFile Off';
Line 2764 sub handler {	Line 2764 sub handler {
$can_modify = 1;	$can_modify = 1;
$can_delete = 1;	$can_delete = 1;
$can_upload = 1;	$can_upload = 1;
if (&Apache::lonnet::usertools_access('','','portaccess',	if (&Apache::lonnet::usertools_access($uname,$udom,'portaccess',
undef,'tools')) {	undef,'tools')) {
$can_viewacl = 1;	$can_viewacl = 1;
$can_setacl = 1;	$can_setacl = 1;