--- loncom/interface/portfolio.pm 2010/02/02 07:09:41 1.212.2.3 +++ loncom/interface/portfolio.pm 2010/02/12 19:19:21 1.212.2.4 @@ -1,7 +1,7 @@ # The LearningOnline Network # portfolio browser # -# $Id: portfolio.pm,v 1.212.2.3 2010/02/02 07:09:41 raeburn Exp $ +# $Id: portfolio.pm,v 1.212.2.4 2010/02/12 19:19:21 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -88,13 +88,13 @@ sub display_common { my $iconpath= $r->dir_config('lonIconsURL') . "/"; my %lt=&Apache::lonlocal::texthash( - 'upload' => 'Upload', - 'upload_label' => 'Upload file to current directory', - 'createdir' => 'Create Subdirectory', - 'createdir_label' => - 'Create subdirectory in current directory', - 'parse' => 'If HTML file, upload embedded images/multimedia/css/linked files' - ); + 'upload' => 'Upload', + 'upload_label' => 'Upload file to current directory', + 'createdir' => 'Create Subdirectory', + 'createdir_label' => 'Create subdirectory in current directory', + 'parse' => 'Upload embedded images/multimedia/css/linked files if HTML file', + ); + 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'); @@ -105,8 +105,9 @@ sub display_common { $parse_check = <<"END";
- END @@ -117,7 +118,7 @@ END $r->print('
' .'
' .'
' - .''.$lt{'upload_label'}.'' + .''.$lt{'upload_label'}.'' .$groupitem .'' .'' @@ -135,7 +136,7 @@ END $r->print('
' .'' .'
' - .''.$lt{'createdir_label'}.'' + .''.$lt{'createdir_label'}.'' .''.$groupitem .'' .''