--- loncom/interface/lonindexer.pm 2008/09/19 09:08:53 1.183
+++ loncom/interface/lonindexer.pm 2009/02/11 15:40:33 1.188
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Directory Indexer
#
-# $Id: lonindexer.pm,v 1.183 2008/09/19 09:08:53 bisitz Exp $
+# $Id: lonindexer.pm,v 1.188 2009/02/11 15:40:33 jms Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -420,7 +420,7 @@ ENDHEADER
# ---------------------------------- get state of file attributes to be showing
if ($env{'form.attrs'}) {
- for (my $i=0; $i<=11; $i++) {
+ for (my $i=0; $i<=14; $i++) {
delete $hash{'display_attrs_'.$i};
if ($env{'form.attr'.$i} == 1) {
$attrchk[$i] = 'checked';
@@ -428,7 +428,7 @@ ENDHEADER
}
}
} else {
- for (my $i=0; $i<=11; $i++) {
+ for (my $i=0; $i<=14; $i++) {
$attrchk[$i] = 'checked' if $hash{'display_attrs_'.$i} == 1;
}
}
@@ -444,6 +444,9 @@ ENDHEADER
'st' => 'Statistics',
'au' => 'Author',
'kw' => 'Keywords',
+ 'sb' => 'Subject',
+ 'nt' => 'Notes',
+ 'ab' => 'Abstract',
'ln' => 'Language',
'sa' => 'Source Available',
'sr' => 'Show resource',
@@ -467,17 +470,20 @@ ENDHEADER
+
+
+
@@ -569,7 +575,16 @@ END
if ($hash{'display_attrs_11'} == 1);
$r->print("
".&mt("Resource")."
\n")
if ($hash{'display_attrs_7'} == 1);
- $r->print(&Apache::loncommon::end_data_table_header_row());
+ $r->print("
".&mt("Subject")."
\n")
+ if ($hash{'display_attrs_12'} == 1);
+ $r->print("
".&mt("Notes")."
\n")
+ if ($hash{'display_attrs_13'} == 1);
+ $r->print("
".&mt("Abstract")."
\n")
+ if ($hash{'display_attrs_14'} == 1);
+
+ $r->print(&Apache::loncommon::end_data_table_header_row());
+
+
# ----------------- read in what directories have previously been set to "open"
foreach (keys %hash) {
@@ -834,7 +849,7 @@ sub display_line {
my $tabtag='';
my $i=0;
- while ($i<=11) {
+ while ($i<=14) {
$tabtag=join('',$tabtag,"
")
if ($i != 9 &&
$hash{'display_attrs_'.$i} == 1);
@@ -957,9 +972,9 @@ sub display_line {
}
# Set the icon for the file
my $iconname = &Apache::loncommon::icon($listname);
-#SB $r->print("