version 1.19, 2003/08/19 09:31:46
|
version 1.20, 2003/08/25 18:48:11
|
Line 45
|
Line 45
|
|
|
# Change log: |
# Change log: |
# $Log$ |
# $Log$ |
|
# Revision 1.20 2003/08/25 18:48:11 albertel |
|
# - fixing a forgotten ; |
|
# |
# Revision 1.19 2003/08/19 09:31:46 foxr |
# Revision 1.19 2003/08/19 09:31:46 foxr |
# Get socket directory from configuration rather than the old hard coded test |
# Get socket directory from configuration rather than the old hard coded test |
# way that I forgot to un-hard code. |
# way that I forgot to un-hard code. |
Line 150 my $IdleTimeout= 3600; # Wait an hour b
|
Line 153 my $IdleTimeout= 3600; # Wait an hour b
|
# The variables below are only used by the child processes. |
# The variables below are only used by the child processes. |
# |
# |
my $RemoteHost; # Name of host child is talking to. |
my $RemoteHost; # Name of host child is talking to. |
my $UnixSocketDir= $perlvar{'lonSockDir'} |
my $UnixSocketDir= $perlvar{'lonSockDir'}; |
my $IdleConnections = Stack->new(); # Set of idle connections |
my $IdleConnections = Stack->new(); # Set of idle connections |
my %ActiveConnections; # Connections to the remote lond. |
my %ActiveConnections; # Connections to the remote lond. |
my %ActiveTransactions; # LondTransactions in flight. |
my %ActiveTransactions; # LondTransactions in flight. |