--- loncom/interface/lonindexer.pm 2001/12/13 13:59:22 1.30 +++ loncom/interface/lonindexer.pm 2002/01/17 13:53:45 1.32 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Directory Indexer # -# $Id: lonindexer.pm,v 1.30 2001/12/13 13:59:22 harris41 Exp $ +# $Id: lonindexer.pm,v 1.32 2002/01/17 13:53:45 harris41 Exp $ # # Copyright Michigan State University Board of Trustees # @@ -41,6 +41,8 @@ # 8/28,10/15,11/28,11/29 Scott Harrison # 11/30 Matthew Hall # 12/11,12/13 Scott Harrison +# YEAR=2002 +# 1/17 Scott Harrison # ### @@ -78,10 +80,6 @@ my $extrafield; # default extra table ce my $fnum; # file counter my $dnum; # directory counter -# ---------------------------------------------------------------------- BEGIN -sub BEGIN { -} - # ----------------------------- Handling routine called via Apache and mod_perl sub handler { my $r = shift; @@ -487,7 +485,7 @@ sub match_ext { if ($fnptr == 0 and $unpackline[3] ne "") { my $embstyle = &Apache::loncommon::fileembstyle($fext); push @trimlist,$line if (defined($embstyle) && - $embstyle ne 'hdn' ); + ($embstyle ne 'hdn' or $fext eq 'meta')); } else { push @trimlist,$line; }