diff options
Diffstat (limited to 'videoadd.pl')
-rwxr-xr-x | videoadd.pl | 4 |
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"; } } |