summaryrefslogtreecommitdiffstats
path: root/videodb-check.pl
diff options
context:
space:
mode:
authorGuilhem Moulin <guilhem.moulin@ens-lyon.org>2012-02-18 18:25:02 +0100
committerGuilhem Moulin <guilhem.moulin@ens-lyon.org>2012-02-18 18:25:02 +0100
commite339face270549fa90f64c86b9ac2097d8c1462b (patch)
tree24665784db849daa6b9f6d53149db96c5e0b82b9 /videodb-check.pl
parent093f51ecd808e6e688ff7e130c035b792e7fa22d (diff)
connection bug
Diffstat (limited to 'videodb-check.pl')
-rwxr-xr-xvideodb-check.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/videodb-check.pl b/videodb-check.pl
index 14d58ed..1e5691b 100755
--- a/videodb-check.pl
+++ b/videodb-check.pl
@@ -135,8 +135,8 @@ if (@ARGV) {
# Connect to database
my $dsn = "DBI:$config{driver}:database=$config{database};host=$config{hostname};port=$config{port}";
-if (exists $config{dbi_misc}) {
- while (my ($k,$v) = each $config{dbi_misc}) {
+if (defined $config{dbi_misc}) {
+ while (my ($k,$v) = each %{$config{dbi_misc}}) {
$dsn .= ";$k=$v";
}
}