Update of /cvsroot/openinteract/OpenInteract2/script
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv8997
Modified Files:
oi2_daemon
Log Message:
undef the client like the SYNOPSIS for HTTP::Daemon says...
Index: oi2_daemon
===================================================================
RCS file: /cvsroot/openinteract/OpenInteract2/script/oi2_daemon,v
retrieving revision 1.14
retrieving revision 1.15
diff -C2 -d -r1.14 -r1.15
*** oi2_daemon 22 May 2004 15:08:37 -0000 1.14
--- oi2_daemon 1 Dec 2004 04:38:49 -0000 1.15
***************
*** 23,29 ****
HTTP::Daemon::OpenInteract2->add_observer( \&log_entries );
! my $daemon = HTTP::Daemon::OpenInteract2->new(
! { website_dir => $OPT_website_dir,
! daemon_config_file => $OPT_daemon_conf });
while (1) {
my $client = $daemon->accept;
--- 23,30 ----
HTTP::Daemon::OpenInteract2->add_observer( \&log_entries );
! my $daemon = HTTP::Daemon::OpenInteract2->new({
! website_dir => $OPT_website_dir,
! daemon_config_file => $OPT_daemon_conf,
! });
while (1) {
my $client = $daemon->accept;
***************
*** 39,42 ****
--- 40,44 ----
}
$client->close();
+ undef( $client );
}
print "All done.\n";
|