--- loncom/interface/londocs.pm 2009/10/20 20:23:23 1.399
+++ loncom/interface/londocs.pm 2009/10/22 22:25:36 1.401
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Documents
#
-# $Id: londocs.pm,v 1.399 2009/10/20 20:23:23 droeschl Exp $
+# $Id: londocs.pm,v 1.401 2009/10/22 22:25:36 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -2900,7 +2900,7 @@ sub create_form_ul {
'file' => 'File',
'title' => 'Title',
'comment' => 'Comment',
- 'parse' => 'Upload embedded images/multimedia files if HTML file!',
+ 'parse' => 'Upload embedded images/multimedia files if HTML file',
'nd' => 'Upload Document',
'pm' => 'Published Map',
'sd' => 'Special Document',
@@ -3314,9 +3314,7 @@ $r->print('');
my $path = &HTML::Entities::encode($env{'form.folderpath'},'<>&"');
- my @supupdocform = (
- {'
'=>"$help{'Uploading_From_Harddrive'}"},
- );
+ my $supupdocformbtn = "$help{'Uploading_From_Harddrive'}";
my $supupdocform=(<
@@ -3333,7 +3331,7 @@ $r->print('');
SUPDOCFORM
- $supupdocform .= create_form_ul(create_list_elements(@supupdocform))."";
+ $supupdocform .= create_form_ul(Apache::lonhtmlcommon::htmltag('li',$supupdocformbtn,{class => 'LC_menubuttons_inline_text'}))."";
my $supnewfolderform=(<