[LON-CAPA-cvs] cvs: loncom(version_2_9_X) /interface lonindexer.pm

raeburn raeburn@source.lon-capa.org
Wed, 31 Mar 2010 00:41:44 -0000


This is a MIME encoded message

--raeburn1269996104
Content-Type: text/plain

raeburn		Wed Mar 31 00:41:44 2010 EDT

  Modified files:              (Branch: version_2_9_X)
    /loncom/interface	lonindexer.pm 
  Log:
  - Replace newer <th></th> tags around recent column headings with
     <td><b></b></td> for consistency with older headings (pre 2.10 style).
  - Backport 1.205.
  
  
--raeburn1269996104
Content-Type: text/plain
Content-Disposition: attachment; filename="raeburn-20100331004144.txt"

Index: loncom/interface/lonindexer.pm
diff -u loncom/interface/lonindexer.pm:1.181.4.4 loncom/interface/lonindexer.pm:1.181.4.5
--- loncom/interface/lonindexer.pm:1.181.4.4	Thu Jan 28 00:01:13 2010
+++ loncom/interface/lonindexer.pm	Wed Mar 31 00:41:44 2010
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Directory Indexer
 #
-# $Id: lonindexer.pm,v 1.181.4.4 2010/01/28 00:01:13 raeburn Exp $
+# $Id: lonindexer.pm,v 1.181.4.5 2010/03/31 00:41:44 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -437,87 +437,91 @@
 	    }
 	}
 
-# ------------------------------- output state of file attributes to be showing
-#                                 All versions has to the last item
-#                                 since it does not take an extra col
-	my %lt=&Apache::lonlocal::texthash(
-					   'ti' => 'Title',
-					   'si' => 'Size',
-					   'la' => 'Last access',
-					   'lm' => 'Last modified',
-					   'st' => 'Statistics',
-					   'au' => 'Author',
-					   'kw' => 'Keywords',
-                                           'sb' => 'Subject',
-                                           'nt' => 'Notes',
-                                           'ab' => 'Abstract',
-					   'ln' => 'Language',
-                                           'gl' => 'Grade Level',
-                                           'sd' => 'Standards',
-					   'sa' => 'Source Available',
-					   'sr' => 'Show resource',
-					   'li' => 'Linked/Related Resources',
-					   'av' => 'All versions',
-					   'ud' => 'Update Display',
-					   'pr' => 'Problems',
-					   'gr' => 'Graphics',
-					   'at' => 'All types',
-                                           'hd' => 'Display Options',
-					   );
-	$r->print(<<END);
-<fieldset>
-<legend>$lt{'hd'}</legend>
-<form method="post" name="fileattr" action="$uri" enctype="application/x-www-form-urlencoded">
-<label><input type="checkbox" name="attr9" value="1" $attrchk[9] onclick="this.form.submit();" /> $lt{'av'}</label>
-<table border="0">
-<tr>
-<td><label><input type="checkbox" name="attr0" value="1" $attrchk[0] onclick="this.form.submit();" /> $lt{'ti'}</label></td>
-<td><label><input type="checkbox" name="attr4" value="1" $attrchk[4] onclick="this.form.submit();" /> $lt{'au'}</label></td>
-<td><label><input type="checkbox" name="attr5" value="1" $attrchk[5] onclick="this.form.submit();" /> $lt{'kw'}</label></td>
-<td><label><input type="checkbox" name="attr6" value="1" $attrchk[6] onclick="this.form.submit();" /> $lt{'ln'}</label></td>
-<td><label><input type="checkbox" name="attr13" value="1" $attrchk[13] onclick="this.form.submit();" /> $lt{'nt'}</label></td>
-<td><label><input type="checkbox" name="attr16" value="1" $attrchk[16] onclick="this.form.submit();" /> $lt{'sd'}</label></td>
-</tr>
-<tr>
-<td><label><input type="checkbox" name="attr1" value="1" $attrchk[1] onclick="this.form.submit();" /> $lt{'si'}</label></td>
-<td><label><input type="checkbox" name="attr2" value="1" $attrchk[2] onclick="this.form.submit();" /> $lt{'la'}</label></td>
-<td><label><input type="checkbox" name="attr3" value="1" $attrchk[3] onclick="this.form.submit();" /> $lt{'lm'}</label></td>
-<td><label><input type="checkbox" name="attr10" value="1" $attrchk[10] onclick="this.form.submit();" /> $lt{'sa'}</label></td>
-<td><label><input type="checkbox" name="attr14" value="1" $attrchk[14] onclick="this.form.submit();" /> $lt{'ab'}</label></td>
-<td>&nbsp;</td>
-</tr>
-<tr>
-<td><label><input type="checkbox" name="attr8" value="1" $attrchk[8] onclick="this.form.submit();" /> $lt{'st'}</label></td>
-<td><label><input type="checkbox" name="attr11" value="1" $attrchk[11] onclick="this.form.submit();" /> $lt{'li'}</label></td>
-<td><label><input type="checkbox" name="attr7" value="1" $attrchk[7] onclick="this.form.submit();" /> $lt{'sr'}</label></td>
-<td><label><input type="checkbox" name="attr12" value="1" $attrchk[12] onclick="this.form.submit();" /> $lt{'sb'}</label></td>
-<td><label><input type="checkbox" name="attr15" value="1" $attrchk[15] onclick="this.form.submit();" /> $lt{'gl'}</label></td>
-<td>&nbsp;</td>
-</tr>
-</table>
-<input type="hidden" name="attrs" value="1" />
-END
         my @file_categories = &Apache::loncommon::filecategories();
         my %select_file_categories;
         my @select_form_order = ('');
         $select_file_categories{''} = &mt('All file types');
         foreach my $cat (@file_categories) {
-	    my $types = join(",",&Apache::loncommon::filecategorytypes($cat));
-	    $select_file_categories{$types} = &mt($cat);
-	    push(@select_form_order,$types);
-	}
+            my $types = join(",",&Apache::loncommon::filecategorytypes($cat));
+            $select_file_categories{$types} = &mt($cat);
+            push(@select_form_order,$types);
+        }
         $select_file_categories{'select_form_order'} = \@select_form_order;
         my $type_element=
             &Apache::loncommon::select_form(
                 $typeselect,
                 'only',
                 %select_file_categories);
-        $type_element = '<label>'.&mt('File Type Displayed: [_1]',
-				      $type_element).'</label>';
-        $r->print($type_element
-                 .'</fieldset>');
+        my $type_selector = '<label>'.&mt('File Type Displayed: [_1]',
+                                          $type_element).'</label>';
+
+# ------------------------------- output state of file attributes to be showing
+#                                 All versions has to the last item
+#                                 since it does not take an extra col
+
+        my %lt=&Apache::lonlocal::texthash(
+                                           'av' => 'All versions',
+                                           'ud' => 'Update Display',
+                                           'pr' => 'Problems',
+                                           'gr' => 'Graphics',
+                                           'at' => 'All types',
+                                           'hd' => 'Display Options'
+                                           );
+        my @disp_order = ('0','4','5','6','13','1','2','3','10','14','8','11','7','12','15','16');
+        my %disp_options = &Apache::lonlocal::texthash (
+                              0  => 'Title',
+                              4  => 'Author',
+                              5  => 'Keywords',
+                              6  => 'Language',
+                              13 => 'Notes',
+                              1  => 'Size',
+                              2  => 'Last access',
+                              3  => 'Last modified',
+                              10 => 'Source Available',
+                              14 => 'Abstract',
+                              8  => 'Statistics',
+                              11 => 'Linked/Related Resources',
+                              7  => 'Show resource',
+                              12 => 'Subject',
+                              15 => 'Grade Level',
+                              16 => 'Standards',
+                           );
+        my $cell = 0;
+        my $numinrow = 4;
+        $r->print('
+<form method="post" name="fileattr" action="'.$uri.'" enctype="application/x-www-form-urlencoded">
+<fieldset>
+<legend><b>'.$lt{'hd'}.'</b></legend>
+<table style=" border-collapse: collapse; border-style: none;">'."\n");
+        foreach my $item (@disp_order) {
+            my $style = 'padding-left: 12px; padding-right: 8px;';
+            if ($cell%$numinrow == 0) {
+                $r->print('<tr>');
+            }
+            $cell ++;
+            if ($cell > 3 * $numinrow) {
+                $style .= ' padding-bottom: 6px;';
+            }
+            if (defined($disp_options{$item})) {
+                $r->print('<td style="'.$style.'"><span class="LC_nobreak">'.
+                          '<label><input type="checkbox" name="attr'.$item.'" value="1" '.
+                          $attrchk[$item].' onclick="this.form.submit();" /> '.$disp_options{$item}.
+                          '</label></span></td>'."\n");
+            }
+            if ($cell > 1 && $cell%$numinrow == 0) {
+                $r->print('</tr>');
+            }
+        }
         $r->print(<<END);
-<br />
+<tr>
+<td style="font-style: italic; border-top: 1px solid black; padding-top: 6px">
+<label><input type="checkbox" name="attr9" value="1" $attrchk[9] onclick="this.form.submit();" /> $lt{'av'}</label>
+</td>
+<td colspan="3" style="padding-left:8px; padding-top: 4px; font-style: italic; border-top: 1px solid black; padding-top: 8px">$type_selector</td>
+</tr>
+</table>
+<input type="hidden" name="attrs" value="1" />
+</fieldset>
 <input type="submit" name="updatedisplay" value="$lt{'ud'}" />
 <input type="hidden" name="acts" value="" />
 $closebutton $groupimportbutton
@@ -585,15 +589,15 @@
 	    if ($hash{'display_attrs_11'} == 1);
 	$r->print("<td><b>".&mt("Resource")."</b></td>\n")
 	    if ($hash{'display_attrs_7'} == 1);
-        $r->print("<th>".&mt("Subject")."</th>\n")
+        $r->print("<td><b>".&mt("Subject")."</b></td>\n")
             if ($hash{'display_attrs_12'} == 1);
-        $r->print("<th>".&mt("Notes")."</th>\n")
+        $r->print("<td><b>".&mt("Notes")."</b></td>\n")
             if ($hash{'display_attrs_13'} == 1);
-        $r->print("<th>".&mt("Abstract")."</th>\n")
+        $r->print("<td><b>".&mt("Abstract")."</b></td>\n")
             if ($hash{'display_attrs_14'} == 1);
-        $r->print("<th>".&mt("Grade Level")."</th>\n")
+        $r->print("<td><b>".&mt("Grade Level")."</b></td>\n")
             if ($hash{'display_attrs_15'} == 1);
-        $r->print("<th>".&mt("Standards")."</th>\n")
+        $r->print("<td><b>".&mt("Standards")."</b></td>\n")
             if ($hash{'display_attrs_16'} == 1);
 	$r->print('</tr>');
 

--raeburn1269996104--