From e4bd50f5e68565998888f44bb6c6a45d4087bbf0 Mon Sep 17 00:00:00 2001 From: jbjohnso Date: Tue, 13 Oct 2009 19:42:14 +0000 Subject: [PATCH] -Fix problem where xfork did not successfully relinquish open db handles (with this change, fuser on a sqlite file, for instance, looks much more correct) git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@4376 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd --- perl-xCAT/xCAT/Utils.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/perl-xCAT/xCAT/Utils.pm b/perl-xCAT/xCAT/Utils.pm index 967bce17d..7f2e0164f 100644 --- a/perl-xCAT/xCAT/Utils.pm +++ b/perl-xCAT/xCAT/Utils.pm @@ -335,6 +335,7 @@ sub xfork #my %drivers = DBI->installed_drivers; foreach (values %{$::XCAT_DBHS}) { #@{$drh->{ChildHandles}}) { + if ($_) { $_->disconnect(); } $_->{InactiveDestroy} = 1; undef $_; }