Commit 1341646f authored by Francesc Guasch's avatar Francesc Guasch
Browse files

Merge branch 'fix/1637_group_base' of into fix/1637_group_base

parents 8339a51a 8c92d250
......@@ -2382,6 +2382,11 @@ sub _connect_dbh {
my $db_pass = ($CONFIG->{db}->{password} or undef);
my $db = ( $CONFIG->{db}->{db} or 'ravada' );
my $host = $CONFIG->{db}->{host};
my $hostname = $CONFIG->{db}->{hostname};
if (defined $host && defined $hostname && $host ne $hostname) {
warn "Warning: DB config in $FILE_CONFIG conflicting parameters host='$host', hostname='$hostname'\n";
$host = $hostname if !defined $host && defined $hostname;
my $data_source = "DBI:$driver:$db";
$data_source = "DBI:$driver:database=$db;host=$host"
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment