|
version 1.156.2.2, 2006/08/18 20:55:44
|
version 1.157, 2006/08/14 21:34:17
|
|
Line 644 sub display_access {
|
Line 644 sub display_access {
|
| # $info .= &mt('Alternatively access can be granted to people with specific LON-CAPA usernames and domains.'); |
# $info .= &mt('Alternatively access can be granted to people with specific LON-CAPA usernames and domains.'); |
| $info .= '</li></ul>'; |
$info .= '</li></ul>'; |
| if ($group eq '') { |
if ($group eq '') { |
| $info .= (&mt("A listing of files viewable without log-in is available at: <a href='/adm/$udom/$uname/aboutme/portfolio'>http://$ENV{'SERVER_NAME'}/adm/$udom/$uname/aboutme/portfolio</a>.<br />For logged in users a 'Display file listing' link will also appear (when there are viewable files) on your personal information page:<br /><a href='/adm/$udom/$uname/aboutme'>http://$ENV{'SERVER_NAME'}/adm/$udom/$uname/aboutme</a><br />")); |
$info .= (&mt("Direct others to the 'Display file listing' link (shown when there are viewable files) on your personal information page:<br /><a href='/adm/$udom/$uname/aboutme'>http://$ENV{'SERVER_NAME'}/adm/$udom/$uname/aboutme</a>")); |
| } |
} |
| |
|
| if ($can_setacl) { |
if ($can_setacl) { |
|
Line 1678 sub createdir {
|
Line 1678 sub createdir {
|
| } |
} |
| |
|
| sub get_portfolio_root { |
sub get_portfolio_root { |
| my ($udom,$uname) = @_; |
my ($uname,$udom) = &get_name_dom(); |
| if (!(defined($udom)) || !(defined($uname))) { |
|
| ($uname,$udom) = &get_name_dom(); |
|
| } |
|
| my $path; |
my $path; |
| if (defined($env{'form.group'})) { |
if (defined($env{'form.group'})) { |
| $path = '/userfiles/groups/'.$env{'form.group'}.'/portfolio'; |
$path = '/userfiles/groups/'.$env{'form.group'}.'/portfolio'; |
![[BACK]](/icons/back.gif){kind=icon}
Return to portfolio.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface