--- loncom/interface/portfolio.pm 2006/11/01 16:09:04 1.168 +++ 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.168 2006/11/01 16:09:04 albertel Exp $ +# $Id: portfolio.pm,v 1.169 2006/11/01 16:12:35 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -270,7 +270,7 @@ sub display_directory { $r->print(&Apache::loncommon::help_open_topic('Portfolio FileList', 'Using the portfolio file list')); $r->print('
Actions | Name'. + ' | ||||||
---|---|---|---|---|---|---|---|
Actions | Name'. &Apache::loncommon::help_open_topic('Portfolio OpenFile'). ' | Size | Last Modified | Current Access Status'.
&Apache::loncommon::help_open_topic('Portfolio ShareFile').
@@ -538,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)) { @@ -649,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); @@ -766,9 +766,9 @@ sub display_access { 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')); + $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'), |