|
From: Bob T. <bt...@us...> - 2005-03-30 15:15:59
|
Update of /cvsroot/benson/benson3/src/perl/Benson/lib/Benson/Handlers In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv11413/src/perl/Benson/lib/Benson/Handlers Modified Files: Shutdown.pm Log Message: Only opening up one db handle per process...slight better. Index: Shutdown.pm =================================================================== RCS file: /cvsroot/benson/benson3/src/perl/Benson/lib/Benson/Handlers/Shutdown.pm,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -r1.1 -r1.2 *** Shutdown.pm 1 Sep 2001 18:44:39 -0000 1.1 --- Shutdown.pm 30 Mar 2005 15:15:32 -0000 1.2 *************** *** 5,8 **** --- 5,9 ---- print " Benson::Handlers::Shutdown begins\n"; print $s->hostname."\n"; + $s->dbhandle->disconnect; undef $s; } |