From: Steinar H. Gunderson <sesse@samfundet.no>
Date: Mon, 14 Feb 2005 01:06:24 +0000 (+0000)
Subject: Disconnect the database handle cleanly on exit.
X-Git-Url: https://git.sesse.net/?p=ccbs;a=commitdiff_plain;h=61fbc22bd19a5888abae2ff8b8bdf4b385e4d6ee;hp=ccc5e31ac4db570fce4836d6ac77d39200e19b54;ds=sidebyside

Disconnect the database handle cleanly on exit.
---

diff --git a/html/show-tournament.pl b/html/show-tournament.pl
index fe40817..999ea10 100755
--- a/html/show-tournament.pl
+++ b/html/show-tournament.pl
@@ -47,3 +47,4 @@ for my $score (@$scores) {
 
 ccbs::print_header();
 ccbs::process_template('show-tournament.tmpl', 'Turnering', { tournament => $tournament, rounds => \@rounds });
+$dbh->disconnect;
diff --git a/html/tournaments.pl b/html/tournaments.pl
index 169d84d..8417b3c 100755
--- a/html/tournaments.pl
+++ b/html/tournaments.pl
@@ -9,3 +9,4 @@ my $tournaments = ccbs::db_fetch_all($dbh, 'SELECT * FROM tournaments NATURAL JO
 
 ccbs::print_header();
 ccbs::process_template('tournaments.tmpl', 'Turneringer', { tournaments => $tournaments });
+$dbh->disconnect;