Lines 690-696
sub _new_dbh
Link Here
|
690 |
my $db_passwd = $context->config("pass"); |
690 |
my $db_passwd = $context->config("pass"); |
691 |
# MJR added or die here, as we can't work without dbh |
691 |
# MJR added or die here, as we can't work without dbh |
692 |
my $dbh= DBI->connect("DBI:$db_driver:dbname=$db_name;host=$db_host;port=$db_port", |
692 |
my $dbh= DBI->connect("DBI:$db_driver:dbname=$db_name;host=$db_host;port=$db_port", |
693 |
$db_user, $db_passwd) or die $DBI::errstr; |
693 |
$db_user, $db_passwd, {'RaiseError' => $ENV{DEBUG}?1:0 }) or die $DBI::errstr; |
694 |
my $tz = $ENV{TZ}; |
694 |
my $tz = $ENV{TZ}; |
695 |
if ( $db_driver eq 'mysql' ) { |
695 |
if ( $db_driver eq 'mysql' ) { |
696 |
# Koha 3.0 is utf-8, so force utf8 communication between mySQL and koha, whatever the mysql default config. |
696 |
# Koha 3.0 is utf-8, so force utf8 communication between mySQL and koha, whatever the mysql default config. |
697 |
- |
|
|