--- loncom/lonnet/perl/lonnet.pm	2002/11/22 18:07:14	1.302
+++ loncom/lonnet/perl/lonnet.pm	2002/11/27 15:33:10	1.303
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # TCP networking package
 #
-# $Id: lonnet.pm,v 1.302 2002/11/22 18:07:14 albertel Exp $
+# $Id: lonnet.pm,v 1.303 2002/11/27 15:33:10 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3473,6 +3473,7 @@ BEGIN {
     my $config=Apache::File->new("$perlvar{'lonTabDir'}/hosts.tab");
 
     while (my $configline=<$config>) {
+       next if ($configline =~ /^(\#|\s*$)/);
        chomp($configline);
        my ($id,$domain,$role,$name,$ip,$domdescr)=split(/:/,$configline);
        if ($id && $domain && $role && $name && $ip) {