Disconnect the database handle cleanly on exit.

[ccbs] / html / tournaments.pl

diff --git a/html/tournaments.pl b/html/tournaments.pl
index 169d84d1b1c1b0c253b0558433ee05d39a71bc68..8417b3c3af24bdd8e4baa57ea2e95607a739a271 100755 (executable)
--- 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;