version 1.19, 2003/11/03 10:18:13
|
version 1.20, 2003/11/03 10:24:49
|
Line 241 sub ReadConfig {
|
Line 241 sub ReadConfig {
|
my $hoststab = LondConnection::read_hosts( |
my $hoststab = LondConnection::read_hosts( |
"$perlvar{'lonTabDir'}/hosts.tab"); |
"$perlvar{'lonTabDir'}/hosts.tab"); |
%hostshash = %{$hoststab}; |
%hostshash = %{$hoststab}; |
|
$MyHost = $perlvar{lonHostID}; # Set hostname from vars. |
} else { |
} else { |
my $hoststab = LondConnection::read_hosts($ForeignHostTab); |
my $hoststab = LondConnection::read_hosts($ForeignHostTab); |
%hostshash = %{$hoststab}; |
%hostshash = %{$hoststab}; |