--- loncom/interface/lonindexer.pm 2003/03/14 16:12:14 1.62
+++ loncom/interface/lonindexer.pm 2003/03/19 14:50:32 1.63
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Directory Indexer
#
-# $Id: lonindexer.pm,v 1.62 2003/03/14 16:12:14 albertel Exp $
+# $Id: lonindexer.pm,v 1.63 2003/03/19 14:50:32 ng Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -390,11 +390,12 @@ $r->print(&Apache::loncommon::bodytag('B
Size
Last access
Last modified
-
Show Resource
+
All versions
Author
Keywords
Language
-
All versions
+
Show Resource
+
@@ -428,7 +429,7 @@ END
$r->print("
Language
\n")
if ($hash{'display_attrs_6'} == 1);
$r->print("
Resource
\n")
- if ($hash{'display_attrs_8'} == 1);
+ if ($hash{'display_attrs_7'} == 1);
$r->print('');
# ----------------- read in what directories have previously been set to "open"
@@ -514,7 +515,7 @@ sub scanDir {
my ($strip,$dom,undef,$testdir,undef)=split(/\&/,$line,5);
next if $strip =~ /.*\.meta$/;
my (@fileparts) = split(/\./,$strip);
- if ($hash{'display_attrs_7'} != 1) {
+ if ($hash{'display_attrs_8'} != 1) {
if (scalar(@fileparts) >= 3) {
my $fext = pop @fileparts;
my $ov = pop @fileparts;
@@ -638,16 +639,18 @@ sub display_line {
my $tabtag='';
my $i=0;
- while ($i<=6) {
+ while ($i<=7) {
$tabtag=join('',$tabtag,"
")
if $hash{'display_attrs_'.$i} == 1;
$i++;
}
+
+ my $valign = ($hash{'display_attrs_7'} == 1 ? 'top' : 'bottom');
# display uplink arrow
if ($filecom[1] eq 'viewOneUp') {
$r->print("