@@ -573,6 +582,14 @@ END
if ($hash{'display_attrs_7'} == 1);
$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("
".&mt("Grade Level")."
\n")
+ if ($hash{'display_attrs_15'} == 1);
+ $r->print("
".&mt("Standards")."
\n")
+ if ($hash{'display_attrs_16'} == 1);
$r->print(&Apache::loncommon::end_data_table_header_row());
@@ -841,11 +858,11 @@ sub display_line {
my $tabtag='';
my $i=0;
- while ($i<=12) {
+ while ($i<=16) {
$tabtag=join('',$tabtag,"
")
if ($i != 9 &&
$hash{'display_attrs_'.$i} == 1);
- $i++;
+ $i++;
}
my $valign = ($hash{'display_attrs_7'} == 1 ? 'top' : 'bottom');
@@ -999,7 +1016,7 @@ sub display_line {
$indent--;
}
# General indentation
- if ($indent > 0 and $indent < 12) {
+ if ($indent > 0 and $indent < 16) {
$r->print("\n");
} elsif ($indent >0) {
@@ -1130,11 +1147,34 @@ sub display_line {
if ($hash{'display_attrs_12'} == 1) {
my $subject = &Apache::lonnet::metadata($filelink,'subject');
- # $keywords = ' ' if (!$keywords);
$r->print('
'.($subject eq '' ? ' ' : $subject).
"
\n");
}
+ if ($hash{'display_attrs_13'} == 1) {
+ my $notes = &Apache::lonnet::metadata($filelink,'notes');
+ $r->print('
'.($notes eq '' ? ' ' : $notes).
+ "
\n");
+ }
+
+ if ($hash{'display_attrs_14'} == 1) {
+ my $abstract = &Apache::lonnet::metadata($filelink,'abstract');
+ $r->print('
'.($abstract eq '' ? ' ' : $abstract).
+ "
\n");
+ }
+
+ if ($hash{'display_attrs_15'} == 1) {
+ my $gradelevel = &Apache::lonnet::metadata($filelink,'gradelevel');
+ $r->print('
'.($gradelevel eq '' ? ' ' : $gradelevel).
+ "
\n");
+ }
+
+ if ($hash{'display_attrs_16'} == 1) {
+ my $standards = &Apache::lonnet::metadata($filelink,'standards');
+ $r->print('
'.($standards eq '' ? ' ' : $standards).
+ "
\n");
+ }
+
$r->print(&Apache::loncommon::end_data_table_row());
}
@@ -1228,10 +1268,32 @@ sub display_line {
}
if ($hash{'display_attrs_12'} == 1) {
my $subject = &Apache::lonnet::metadata($filelink,'subject');
- # $keywords = ' ' if (!$keywords);
$r->print('
'.($subject eq '' ? ' ' : $subject).
"
\n");
}
+ if ($hash{'display_attrs_13'} == 1) {
+ my $notes = &Apache::lonnet::metadata($filelink,'notes');
+ $r->print('
'.($notes eq '' ? ' ' : $notes).
+ "
\n");
+ }
+
+ if ($hash{'display_attrs_14'} == 1) {
+ my $abstract = &Apache::lonnet::metadata($filelink,'abstract');
+ $r->print('
'.($abstract eq '' ? ' ' : $abstract).
+ "
\n");
+ }
+
+ if ($hash{'display_attrs_15'} == 1) {
+ my $gradelevel = &Apache::lonnet::metadata($filelink,'gradelevel');
+ $r->print('
'.($gradelevel eq '' ? ' ' : $gradelevel).
+ "
\n");
+ }
+
+ if ($hash{'display_attrs_16'} == 1) {
+ my $standards = &Apache::lonnet::metadata($filelink,'standards');
+ $r->print('