42 |
$self->{_koha_size} = 0; |
$self->{_koha_size} = 0; |
43 |
} else { |
} else { |
44 |
|
|
45 |
|
$arg->{dsn} ||= 'dbi:mysql:database=koha'; |
46 |
|
$arg->{user} ||= $ENV{KOHA_USER}; |
47 |
|
$arg->{passwd} ||= $ENV{KOHA_PASSWD}, |
48 |
|
$arg->{sql} ||= 'select biblioitemnumber as mfn, marc from biblioitems'; |
49 |
|
|
50 |
$log->info("opening Koha database '$arg->{dsn}'"); |
$log->info("opening Koha database '$arg->{dsn}'"); |
51 |
|
|
52 |
$self->{_dbh} = DBI->connect( $arg->{dsn}, $arg->{user}, $arg->{passwd}, { RaiseError => 1 } ); |
$self->{_dbh} = DBI->connect( $arg->{dsn}, $arg->{user}, $arg->{passwd}, { RaiseError => 1 } ); |