--- loncom/interface/londocs.pm 2009/03/17 14:50:53 1.357 +++ loncom/interface/londocs.pm 2009/03/17 21:41:30 1.359 @@ -1,7 +1,7 @@ # The LearningOnline Network # Documents # -# $Id: londocs.pm,v 1.357 2009/03/17 14:50:53 bisitz Exp $ +# $Id: londocs.pm,v 1.359 2009/03/17 21:41:30 tempelho Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1775,7 +1775,7 @@ sub entryline { '
@@ -3264,11 +3262,9 @@ my %supnamehash = ( ); my $tid='2'; -my $content='content'; -my $navigation='navigation'; my $varscd = 'Supplemental Course Documents'; -$r->print(&generate_edit_table($tid,$content,$navigation,$varscd,\%supnamehash,\%suporderhash)); +$r->print(&generate_edit_table($tid,$varscd,\%supnamehash,\%suporderhash)); my $error = &editor($r,$coursenum,$coursedom,$folder,$allowed,'',$type); if ($error) { $r->print('

'.$error.'

'); @@ -3327,24 +3323,24 @@ ENDOPTIONFORM sub generate_edit_table { - my ($tid,$content,$navigation,$varcd,$namehash_ref,$orderhash_ref) = @_; + my ($tid,$varcd,$namehash_ref,$orderhash_ref) = @_; my %namehash = %{$namehash_ref}; my %orderhash = %{$orderhash_ref}; my $form; $form = '

'.&mt($varcd).'

'; - $form .= '