From: Chris W. <la...@us...> - 2004-12-01 04:38:57
|
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"; |