--- loncom/interface/londocs.pm 2009/02/03 18:31:59 1.335 +++ loncom/interface/londocs.pm 2009/02/10 14:23:18 1.339 @@ -1,7 +1,7 @@ # The LearningOnline Network # Documents # -# $Id: londocs.pm,v 1.335 2009/02/03 18:31:59 ehlerst Exp $ +# $Id: londocs.pm,v 1.339 2009/02/10 14:23:18 ehlerst Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2764,7 +2764,7 @@ sub handler { 'sipr' => 'Simple Problem', 'drbx' => 'Drop Box', 'scuf' => 'Score Upload Form', - 'bull' => 'Bulletin Board', + 'bull' => 'Discussion Board', 'mypi' => 'My Personal Info', 'grpo' => 'Group Files', 'rost' => 'Course Roster', @@ -2872,12 +2872,23 @@ ERFORM $containertag = ''; $uploadtag = ''; } - - $r->print(&generate_admin_options($containertag,$uploadtag,\%lt,\%help,\%env)); + $r->print(< + + + + + $containertag + +
+ + $uploadtag +
+HIDDENFORM } # --------------------------------------------------------- Main tab structure my $activeClass = 1; - $r->print('
'); # --------------------------------------------------------- Standard documents if (($standard) && ($allowed) && (!$forcesupplement)) { my $active = 'style="display: none;"'; @@ -3154,6 +3166,7 @@ $r->print('
'); $active = 'style="display: block;"'; } $r->print('
'); + &changewarning($r); my $folder=$env{'form.folder'}; unless ($folder=~/^supplemental/) { $folder='supplemental'; @@ -3264,9 +3277,12 @@ my $error = &editor($r,$coursenum,$cours if ($error) { $r->print('

'.$error.'

'); } -$r->print('print('
'); } } +$r->print(''); $r->print('
'); if ($allowed) { $r->print(' @@ -3292,24 +3308,18 @@ $r->print('
'); } sub generate_admin_options { - my ($containertag,$uploadtag,$lt_ref,$help_ref,$env_ref) = @_; - my %lt = %{$lt_ref}; + my ($containertag,$uploadtag,$help_ref,$env_ref) = @_; + my %lt=&Apache::lonlocal::texthash( + 'vc' => 'Verify Content', + 'cv' => 'Check/Set Resource Versions', + 'ls' => 'List Symbs', + 'sl' => 'Show Log' + ); my %help = %{$help_ref}; my %env = %{$env_ref}; my $dumpbut=&dumpbutton(); my $exportbut=&exportbutton(); return (< - - - - - $containertag - -
- - $uploadtag -
  • @@ -3333,7 +3343,7 @@ sub generate_admin_options {
-
 
+ ENDOPTIONFORM } @@ -3356,6 +3366,7 @@ sub generate_edit_table { $form .= '
  • '.&mt($orderhash{$name}).'
  • '; } } + $form .= ''; $form .= '
    '; foreach my $field (keys(%namehash)){ $form .= ''; @@ -3377,7 +3388,7 @@ sub editing_js { p_msp => 'Title for the Page', p_msb => 'Title for the Problem', p_mdb => 'Title for the Drop Box', - p_mbb => 'Title for the Bulletin Board', + p_mbb => 'Title for the Discussion Board', p_mab => "Enter user:domain for User's 'About Me' Page", p_mab2 => "About [_99]", p_mab_alrt1 => 'Not a valid user:domain',