--- loncom/interface/lonindexer.pm 2001/12/13 13:38:14 1.28 +++ loncom/interface/lonindexer.pm 2001/12/13 13:42:15 1.29 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Directory Indexer # -# $Id: lonindexer.pm,v 1.28 2001/12/13 13:38:14 harris41 Exp $ +# $Id: lonindexer.pm,v 1.29 2001/12/13 13:42:15 harris41 Exp $ # # Copyright Michigan State University Board of Trustees # @@ -79,12 +79,6 @@ my $dnum; # directory counter # ---------------------------------------------------------------------- BEGIN sub BEGIN { - my $fh=Apache::File->new($Apache::lonnet::perlvar{'lonTabDir'}. - '/language.tab'); - while(<$fh>) { - $_=~/(\w+)\s+([\w\s\-]+)/; - $language{$1}=$2; - } } # ----------------------------- Handling routine called via Apache and mod_perl