--- loncom/lonnet/perl/lonnet.pm 2004/12/20 20:29:00 1.580 +++ loncom/lonnet/perl/lonnet.pm 2004/12/20 20:47:23 1.581 @@ -1,7 +1,7 @@ # The LearningOnline Network # TCP networking package # -# $Id: lonnet.pm,v 1.580 2004/12/20 20:29:00 albertel Exp $ +# $Id: lonnet.pm,v 1.581 2004/12/20 20:47:23 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -5582,6 +5582,7 @@ BEGIN { # ----------------------------------- Read loncapa.conf and loncapa_apache.conf unless ($readit) { { + # FIXME: Use LONCAPA::Configuration::read_conf here and omit next block open(my $config,") {