summaryrefslogtreecommitdiffstats
path: root/videoadd.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 /videoadd.pl
parent093f51ecd808e6e688ff7e130c035b792e7fa22d (diff)
connection bug
Diffstat (limited to 'videoadd.pl')
-rwxr-xr-xvideoadd.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/videoadd.pl b/videoadd.pl
index 5c49b61..079a4e3 100755
--- a/videoadd.pl
+++ b/videoadd.pl
@@ -233,8 +233,8 @@ my $dbh;
unless ( defined $ignoredb_flag ) {
# 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";
}
}