connect as root

diff --git a/casopisi2koha.pl b/casopisi2koha.pl
index 963f7dd..4a8cf55 100755 (executable)
--- a/casopisi2koha.pl
+++ b/casopisi2koha.pl
@@ -12,7 +12,7 @@ $|++;
 
 my $f = DBI->connect("dbi:SQLite:dbname=ferlib-2011-06-27.sqlite","","", { RaiseError => 1, AutoCommit => 0 }) || die $DBI::errstr;
 $f->{sqlite_unicode} = 1;
-my $k = DBI->connect("dbi:mysql:database=koha_fer","","", { RaiseError => 1, AutoCommit => 0, mysql_enable_utf8 => 1 }) || die $DBI::errstr;
+my $k = DBI->connect("dbi:mysql:database=koha_fer","root","", { RaiseError => 1, AutoCommit => 0, mysql_enable_utf8 => 1 }) || die $DBI::errstr;
 my $u = DBI->connect("dbi:CSV:","","", { RaiseError => 1, f_ext => '.csv', csv_sep_char => '|' }) || die $DBI::errstr;
 
 our $lookup;