--- loncom/interface/londocs.pm 2009/10/20 20:23:23 1.399
+++ loncom/interface/londocs.pm 2009/10/20 20:43:54 1.400
@@ -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.400 2009/10/20 20:43:54 droeschl Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -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=(<