connection bug

1 files changed, 2 insertions, 2 deletions

diff --git a/videorm.pl b/videorm.pl
index af33032..659f718 100755
--- a/videorm.pl
+++ b/videorm.pl
@@ -162,8 +162,8 @@ if (-l $file_s) {
 
 # 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";
     }
 }