--- loncom/interface/portfolio.pm 2006/10/19 21:23:22 1.166
+++ loncom/interface/portfolio.pm 2006/11/01 16:12:35 1.169
@@ -1,7 +1,7 @@
# The LearningOnline Network
# portfolio browser
#
-# $Id: portfolio.pm,v 1.166 2006/10/19 21:23:22 raeburn Exp $
+# $Id: portfolio.pm,v 1.169 2006/11/01 16:12:35 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -95,6 +95,13 @@ sub display_common {
'createdir_label' =>
'Create subdirectory in current directory:');
my $escuri = &HTML::Entities::encode($r->uri,'&<>"');
+ my $help_fileupload = &Apache::loncommon::help_open_topic('Portfolio AddFiles');
+ my $help_createdir = &Apache::loncommon::help_open_topic('Portfolio CreateDirectory');
+
+ # FIXME: This line should be deleted once Portfolio uses breadcrumbs
+ $r->print(&Apache::loncommon::help_open_topic('Portfolio About', 'Help on the portfolio'));
+
+
$r->print(<<"TABLE");
@@ -109,7 +116,7 @@ sub display_common {
-
+ $help_fileupload
@@ -124,7 +131,7 @@ sub display_common {
-
+ $help_createdir
@@ -155,6 +162,7 @@ TABLE
}
}
$r->print('');
+ $r->print(&Apache::loncommon::help_open_topic('Portfolio ChangeDirectory'));
&Apache::lonhtmlcommon::store_recent($namespace,$current_path,$current_path);
$r->print(' '
@@ -523,7 +538,7 @@ sub delete {
my @files=&Apache::loncommon::get_env_multiple('form.selectfile');
my ($uname,$udom) = &get_name_dom();
if (&Apache::lonnet::is_locked($file_name,$udom,$uname) eq 'true') {
- $r->print ("The file is locked and cannot be deleted. ");
+ $r->print("The file is locked and cannot be deleted. ");
$r->print(&done('Back',$url));
} else {
if (scalar(@files)) {
@@ -634,7 +649,7 @@ sub rename {
my ($uname,$udom) = &get_name_dom();
$file_name = &prepend_group($file_name);
if (&Apache::lonnet::is_locked($file_name,$udom,$uname) eq 'true') {
- $r->print ("The file is locked and cannot be renamed. ");
+ $r->print("The file is locked and cannot be renamed. ");
$r->print(&done(undef,$url));
} else {
&open_form($r,$url);
@@ -748,10 +763,12 @@ sub display_access {
if ($group eq '') {
$info .= (&mt("A listing of files viewable without log-in is available at: http://$ENV{'SERVER_NAME'}/adm/$udom/$uname/aboutme/portfolio. For logged in users a 'Display file listing' link will also appear (when there are viewable files) on your personal information page: http://$ENV{'SERVER_NAME'}/adm/$udom/$uname/aboutme "));
}
-
if ($can_setacl) {
&open_form($r,$url);
$r->print($header.$info);
+ $r->print(' '.&Apache::loncommon::help_open_topic('Portfolio ShareFile SetAccess', 'Help on setting up share access'));
+ $r->print(&Apache::loncommon::help_open_topic('Portfolio ShareFile ChangeSetting', 'Help on changing settings'));
+ $r->print(&Apache::loncommon::help_open_topic('Portfolio ShareFile StopAccess', 'Help on removing share access'));
&access_setting_table($r,$access_controls{$file_name});
my $button_text = {
'continue' => &mt('Proceed'),