OpenPKG CVS Repository
http://cvs.openpkg.org/
____________________________________________________________________________
Server: cvs.openpkg.org Name: Thomas Lotterer
Root: /v/openpkg/cvs Email: [EMAIL PROTECTED]
Module: openpkg-registry Date: 24-Nov-2005 12:13:37
Branch: HEAD Handle: 2005112411133600
Modified files:
openpkg-registry registry-ui.pl
Log:
introduce cleanup sequence. It is important to close database related
object in proper order before exit does the garbage collection in
arbitrary order, otherwise we risk a segfault with modules that are
not pure Perl
Summary:
Revision Changes Path
1.7 +4 -2 openpkg-registry/registry-ui.pl
____________________________________________________________________________
patch -p0 <<'@@ .'
Index: openpkg-registry/registry-ui.pl
============================================================================
$ cvs diff -u -r1.6 -r1.7 registry-ui.pl
--- openpkg-registry/registry-ui.pl 24 Nov 2005 11:10:09 -0000 1.6
+++ openpkg-registry/registry-ui.pl 24 Nov 2005 11:13:36 -0000 1.7
@@ -137,7 +137,7 @@
$out .= sprintf("<br><img src=\"?page=gif;name=icon-x\"> ERROR
accessing backend DataBase. Please come back later.\n");
$out .= &viewhtmltail();
print STDOUT $out;
- exit(0)
+ goto CUS;
}
# continue to the pages that require database access
@@ -205,7 +205,9 @@
}
# die gracefully ;-)
-$dbh->disconnect();
+#
+CUS:
+undef $cgi;
undef $dbh;
exit(0);
@@ .
______________________________________________________________________
The OpenPKG Project www.openpkg.org
CVS Repository Commit List openpkg-cvs@openpkg.org
