--- trunk/all2xml.pl	2003/06/01 13:45:36	49
+++ trunk/all2xml.pl	2003/06/01 13:46:42	50
@@ -19,8 +19,7 @@
 my $config;
 
 use index_DBI;	# there is no other, right now ;-)
-
-my $index = new index_DBI();	# open index
+my $index;
 
 my %opts;
 
@@ -214,6 +213,17 @@
 
 my $cfg = new Config::IniFiles( -file => $config_file );
 
+# open index
+$index = new index_DBI(
+		$cfg->val('global', 'dbi_dbd'),
+		$cfg->val('global', 'dbi_dsn'),
+		$cfg->val('global', 'dbi_user'),
+		$cfg->val('global', 'dbi_passwd') || '',
+	);
+
+# delete [global] section to leave just databases sections
+$cfg->DeleteSection('global');
+
 foreach my $database ($cfg->Sections) {
 
 	my $isis_db = $cfg -> val($database, 'isis_db') || die "$database doesn't have 'isis_db' defined!";